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Mountain  Computer 

put  it  all  together 

^  for  you.  ^ 


The  CPS  MultiFunction  Card 

Three  cards  in  one!  The  Mountain  Computer  CPS  MultiFunction  Card  provides  all  the  capabilities  of  a  serial  interface,  parallel 
output  interface  and  real-time  clock/calendar — all  on  one  card— occupying  only  one  slot  in  your  Apple  II  °.  Serial  and  Parallel 
output  may  be  used  simultaneously  from  CPS.  CPS  is  configured  from  a  set-up  program  on  diskette  which  sets  the  parameters 
(Such  as  baud  rate,  etc. i  for  all  functions  contained  on  the  card  and  is  stored  in  CMOS  RAM  on  the  card.  Once  you  have 
configured  your  card,  you  need  never  set  it  up  again.  You  may  also  change  parameters  from  the  keyboard  with  control 
commands,  Alt  function  set-ups  stored  on-board  are  battery  powered  for  up  to  two  years.  "Phantom  slot"  capability  permits 
assigning  each  of  the  functions  of  CPS  to  different  slots  in  your  Apple  without  the  card  actually  being  in  those  slots!  For 
example,  insert  CPS  in  slot  #4  and  set  it  up  so  that  is  simulates  a  parallel  interface  in  slot  #1  and  a  clock  in  slot  #7  and  leave  the 
serial  port  assigned  to  slot  #4.  CPS's  on-board  intelligence  lets  it  function  in  a  wide  variety  of  configurations,  (hereby  providing 
software  compatibility  with  most  existing  programs.  "We've  put  it  all  together  for  you"— for  these  reasons  and  many  more! 
Drop  by  your  Apple  dealer  and  see  for  yourself  how  our  CPS  MultiFunction  Card  can  expand  the  capabilities  of  your  Apple  and 
save  you  a  great  deal  of  money  as  well!  — t- ;  ; •    • 


Calendar/Clock 

•  One  second  to  99  years 

•  Battery  backed-up  1 2  years ! 
Two  AA  standard  alkaline  batteries 
for  back-up   provided' 
Compatible  with  MCI  Apple  _ 
Clock'"  time  access  programs       _. 


Parallel  Output 

•  Features  auto-line  feed,  Apple 
tabbing,  line  length,  delay  after 
carriage  return,  lower  to  upper 
case  conversion 

•  Centronics  standard — 
reconfigurable  to  other  standards 

•  Status  bit  handshaking 


OS 


S^  Mountain  Computer 

Mf  INCORPORATED 

300  El  Pueblo     Scotts  Valley,  CA  95066 
408.  438-6650        TWX:  910  598-4504 


SPECIAL 

INTRODUCTORY 

PRICE 

$239 


Serial  Interface 

•  Features  auto-line  feed,  trans- 
parent terminal  mode,  Apple 
tabbing,  line  length,  delay  after 
carriage  return,  local  echo  of 
output  characters,  simultaneous 
serial/parallel  output,  lower  to 
upper  case  conversion,  discarding 
of  extraneous  LFs  from  serial  input 

•  Uses  the  powerful  2651  sehal 
PCI  chip 

•  16  selectable  internal  baud  rates— 
50to19.2Kbaud 

•  Half.'Full  duplex  terminal  operation 

•  I/O  interface  conforms  to  RS-232C 

•  Asynchronous/Synchronous 
operation 


""Apple  Clock  was  the  trademark  of  Mountain  Computer  Inc. 


-Apple  and  Apple  II  are  registeretJtrademaritsor  Apple  Computer  Inc 
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IF  YOU'RE  WAITING  FOR  THE 

PRICE  OF  WORD  PROCESSORS 

TO  FALL  WITHIN  REASON, 


Everyone  expected  it  would  happen 
sooner  or  later, . .  with  WordPro  PLUS" 
it  already  has!  Now  all  the  marvelous 
benefits  o(  expensive  and  advanced 
word  processing  systems  are  available 
on  Commodore  computers,  America's 
largest  selling  computer  line.  WordPro 
PLUS,  when  combined  with  the  new  80 
column  CBM  8032.  creates  a  word  pro- 
cessing system  comparable  to  virtually 
any  other  top  quality  word  processor 
available— but  at  savings  of  thousands 
of  dollars! 


New.  low  cost  computer  technology  is 
now  available  at  a  fraction  of  what  you 
would  expect  to  pay.  This  technology 
allowed  Commodore  to  introduce  the 
new  and  revolutionary  CBM  8032 
Computer. 

WordPro  PLUS  turns  this  new  CBM 
8032  Computer  into  a  sophisticated, 
time  saving  word  processing  tool.  With 
WordPro  PLUS,  documents  are  dis- 
played on  the  computer's  screen.  Edit- 
ing and  last  minute  revisions  are  simple 
and  easy.  No  more  lengthy  re-typing 
sessions.  Letters  and  documents  are 
easily  re-called  from  memory  storage 
for  editing  or  printing  with  final  drafts 
printed  perfectly  at  over  five  hundred 
words  per  minute! 


Our  nationwide  team  of  professional 
dealers  will  show  you  how  your  office 
will  benefit  by  using  WordPro  PLUS.  At 
a  price  far  less  than  you  realize. 


Invest  in  your  office's  future. . . 
Invest  in  WordPro  PLUS. . , 
Call  us  today  for  the  name  of  the 
WordPro  PLUS  dealer  nearest  you. 


Professional  Software  Inc. 

166  Crescent  Road 
Needham,  MA  02194 
{617)444-5224 
TELEX:  95  1579 
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Turn  your  Apple  into  the  world's 
most  versatile  personal  computer. 


The  SoftCard™  Solution.  SoftCard 
turns  your  Apple  into  two  computers. 
A  Z-80  and  a  6502.  By  adding  a  Z-80 
microprocessor  and  CP/M  to  your 
Apple,  SoftCard  turns  your  Apple  into 
a  CP/M  based  machine.  That  means 
you  can  access  the  single  largest  body 
of  microcomputer  software  in  exist- 
ence. Two  computers  in  one.  And,  the 
advantages  of  both. 

Plug  and  go.  The  SoftCard  system 
starts  with  a  Z-80  based  circuit  card. 
Just  plug  it  into  any  slot  {except  0)  of 
your  Apple.  No  modifications  required. 
SoftCard  supports  most  of  your  Apple 
peripherals,  and,  in  6502-mode,  your 
Apple  is  still  your  Apple. 

CP/M  for  your  Apple.  You  get  CP/M 
on  disl<  with  the  SoftCard  package.  It's 
a  powerful  and  simple-to-use  operating 
system.  It  supports  more  software 
than  any  other  microcomputer  operat- 
ing system.  And  that's  the  key  to  the 
versatility  of  the  SoftCard/Apple. 


BASIC  included.  A  powerful  tool, 
BASIC-80  is  included  in  the  SoftCard 
package.  Running  under  CP/M,  ANSI 
Standard  BASIC-80  is  the  most 
powerful  microcomputer  BASIC 
available.  It  includes  extensive  disk  I/O 
statements,  error  trapping,  integer 
variables,  16-digit  precision,  exten- 
sive EDIT  commands  and  string  func- 
tions, high  and  low-res  Apple  graphics, 
PRINT  USING,  CHAIN  and  COM- 
MON, plus  many  additional  com- 
mands. And,  it's  a  BASIC  you  can 
compile  with  Microsoft's  BASIC 
Compiler 

More  languages.  With  SoftCard  and 
CP/M,  you  can  add  Microsoft's  ANSI 
Standard  COBOL,  and  FORTRAN,  or 


Basic  Compiler  and  Assijmbly  Lan- 
guage Development  System.  All,  more 
powerful  tools  for  your  Apple- 
Seeing  is  believing.  See  tie  SoftCard 
in  operation  at  your  Microsoft  or  Apple 
dealer.  We  think  you'll  agree  that  the 
SoftCard  turns  your  Apple  into  the 
world's  most  versatile  personal 
computer. 

Complete  information?  It's  at  your 
dealer's  now.  Or,  we'll  send  it  to  you 
and  include  a  dealer  list.  Write  us.  Call 
us. 


SoftCard  is  a  trademark  of  Microsoft.  Apple  1)  and 
Apple  tl  Plus  are  registered  trademarks  of  Apple 
Computer  Z-80  is  a  registered  trademark  of  Zilog. 
Inc.  CP/M  IS  a  registered  tradcnark  of  Digital 
Researcfi.  inc. 


CONSUMER^  PRODUCTS 


Microsoft  Consumer  Products.  400  lOStti  Ave.  N.E  , 
Bellevue.  WA  98004.  (206)  454-1315 
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Robert  Lock,  Editor/Publisher 
Backing-Up 

Software  Copyrights  Revisited 


We're  starting  to  receive  some  interesting  and  well- 
thouglu-oul  rcspon.scs  to  our  scrit'.s  oCfclitnt  iai.s  aiiti 
guest  coninicntarics  on  software  lopyiiglus.  We're  also 
receiving  sonie  responses  that  iiulitatc  a  basic  lack  of 
knowledge  regarding  tlie  legal  aspects  of  copyright  and 
copyrighted  material.  A  recent  example  appears  in  a 
software  catalog  we  received  with  some  software  lor 
review.  I'lie  vendor  states,  in  the  explanaiioii  regarding 
sources  ofsoftwarc  they'ic  selling,  ...this  is  to  lie  done  bs- 
offering  both  our  own  programs  at  a  low  cost,  and  by 
distributing  for  just  a  minima!  fee  the  programs  that  are 
considered  'free  domain',  i.e.  they  have  been  given  out 
in  books  and  magai'.incs,  or  through  com]>uler  clubs  and 
are  considered  available  for  free  use  by  the  ]iiihlic." 

This  indicates  not  on!\'  a  basic  misinidei-sianding  of 
the  copyright  law,  but  a  flagrant  disregard  of  the  strength 
of  copyright. 

The  attitude  is  one  we're  seeing  more  frequently, 
and  someone,  at  some  point,  will  be  caught  b)'  it.  The 
"well  I'm  not  trying  to  make  nutch  money  at  ii"  argument 
is  irrelevant  to  the  protection  afforded  by  copyright. 

"Free  domain"  by  the  way,  is  a  term  tfiat  cftiesn't 
exist.  "Public  domain"  does  —  it  simply  refers  to  that 
body  of  materials  that  are  not  copyrighted.  Books  and 
magazines  generally  don'l  fail  into  that  category. 

The  Fine  Print 

The  following  excerpts  are  taken  from  three  legal 
memorandums  prepared  for  the  National  Audio-Visual 
Association  Materials  Council.  The  information  is  quite 
clear,  and  should  answer  many  questions  you  might 
have  had  regarding  the  state  of  copyright  and  software 
protection.  These  materials  are  reprinted  by  permission 
of  the  NAVA  Materials  Council,  3 1 50  Spring  Street, 
Fairfax,  VA  22031.  Copyright  ©  1981,  National  Audio- 
Visual  Association,  Inc. 

"...  a  copyright  proprietor  of  materials  utilized  in 
such  systems  [computer  and  microcomputer  systems] 
retains  all  of  those  rights  inherent  in  a  copyright,  being 
more  specifically:  the  right  to  reproduce  copies  and/or 
duplications  of  such  works;  the  right  to  control  distribu- 
tion of  such  works  whether  by  .sale,  lease,  rental,  loan  or 
any  other  form  of  dissemination;  the  right  to  use  such 
works  for  purposes  of  adaptive  or  derivative  creation; 
the  right  to  perform  or  license  others  to  perform  such 
works  publicly,  with  or  without  commercial  gain;  and 
the  right  to  display  or  publicly  show  or  exhibit  such 
works.  This  bundle  of  rights  is  in  no  way  diminished 
simply  because  a  copyrighted  work  is  utilized  in  con- 
junction with  computer-like  systeins,  which  entails  that  a 
cassette  or  diskette  cannot  be  reproduced  or  distributed 
without  prior  authorization  of  the  copyright  owner." 

"The  only  extent  to  which  there  may  he  limitations 


on  these  rights  are  those  concerning  'fail-  use'  ...  A 
school  system,  for  example,  may  not  pincluse  a  cassette 
or  diskette  and  simply  reproduce  Lmlimiled  copies  to  be 
chsseminaied  around  its  \arious  locations.  It  may  make, 
perhaps  one  copy  under  "fair  use"  exemptions  in  the 
event  that  the  original  is  lost,  destroyed  or  becomes 
worn.  If,  however,  the  school  s)steni  desires  to  ha\e 
se\'eral  such  cassettes  or  diskettes  in  cite  iila  ion.  then  it 
must  purchase,  rent  or  lease  the  additional  topics. 

"Particularly  because  today's  technologv  allows 
copying  to  be  done  more  easily,  more  quick  I  v  and  less 
expensively  than  e\er  before,  users  of  audi'  >-visual  and 
microcomputer  software  shoulcl  be  a\\'are  of  the  fact 
that  they  are  still  vit)lating  tlie  law  when  tliey  i opy  wiilioul 
permission  of  the  copyright  owner  any  copyrighted 
materials..." 

"Unauthorized  copying  and  distribution  of  video 
cassette  software,  subject  onh-  to  the  narro^»  confines  of 
'fair  use'  is  illegal  and  can  be  prosecuted  both  ci\ilh'  and 
crimitially  on  a  case  by  case  basis." 

Finaih',  the  counsel  for  NAVA,  revieivs  a  December 
12,  1980  amendment  to  the  copyright  code: 

"What  does  the  new  law  provider  Section  7(b)  of 
Pub.  1..96-:'>  17  states: 

"(b)   Serliiiii  117  oj  lillr  1 7  of  llir  i  'titled  States  Cade  is  amended 
to  readasjiillows: 

§1  ]  7.   Limilaliuiis  on  exclusive  rights:  Computer  programs 
Notwilhslattding  the  provisiotis  of  section  106,  it  ,s  not  an  in- 
fringement for  the  uuner  of  a  copy  of  a  computnprogrfini  to  make 
or  authorize  the  making  oj  another  cojiy  or  tidaplalioii  of  thai 
cvmpuler program  provided: 

(1)  thai  such  a  new  copy  or  adaptation  is  created  as  an  essential 
step  in  the  utilization  of  the  computer  progi  am  in  conjunc- 
tion with  a  machine  and  that  it  is  used  in  ny  other  manner, 
or 

(2)  that  such  neie  cops  or  adaptation  is  for  arc}nval  purposes 
only  and  that  all  archival  copies  are  destroyed  in  the  event 
thai  continued  possession  of  the  computer  program  should 
cease  to  he  rightful. 

Any  exact  copies  prepared  in  accordance  with  the  firo'visions  of  this 
section  ma\  he  leased,  sold,  or  olheneise  transferrid,  along  with 
the  ropy  from  which  such  copies  were  prepared,  onh  as  pari  of  the 
lease,  sale,  or  other  transjer  oj  all  rights  in  the  pri.gram.  Adapta- 
tions so  prepared  may  he  transferred  only  with  the  authorization  of 
the  copyright  owner." 

"We  do  not  believe  that  the  above  language  changes  our 
opinion  (as  expressed  in  our  earlier  statements)  that  the 
owner  of  a  properly  copyrighted,  acle<|uaielv  "noticed" 
and  otherwise  copyrightable  work  is  afforded  adequate 
protection  from  illegal  copying  or  other  types  of  in- 
I'ringement...  The  above  language,  however,  while 
admiltcdly  over-riding  the  "bundle  of  rights"  provisions 
of  Section  lOtiof  the  197(5  Act,  does  not  on  its  face 
diminish  the  power  of  the  owner  of  a  comjMiter  pnjgram 
copyright  to  control  the  duplication,  distribution  or 
transference  of  his  works,  except  as  to  the  narrow  scope 
of  duplication  indicated  aliove..." 
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4  new  products  from 


stiafi 


STATISTICS   APPLICATIONS 
FOR   TECHNICIANS 

Here  is  a  package  Ihal  is  so  state-ol- me- 
an thai  many  of  the  statistical  techniques 
implemenled  fiere  are  not  even  in  ttre  text- 
books yet-  STAT  is  a  set  ol  programs  tor 
perlorming  a  large  portion  ol  the  most  fre- 
quently used  statistical  inlerence  methods 
Data  can  be  entered  and  stored  on  four  dif- 
terent  types  of  data  dies  These  data  files 
can  be  modified  also.  The  statistical  pro- 
cedures available  in  the  package  include  the 
following  parametric  inference  procedures: 
SUMMARY  STATISTICS  for  each  data  file 
and  dale  set.  including  the  mean  and  stan- 
dard dei/iation. 

CONFIDENCE  INTERVALS  for  the  lollowing: 
1)  the  mean  of  a  normal  population  (both 
with  and  without  the  variance  known). 
|2|  the  variance  of  a  normal  distribution 
{both  with  and  without  the  mean  known). 
13)  Ihe  parameter  (mean  time  to  failure)  ol 
an  exponential  distribution.  (4)  the  para- 
meter (proportion)  ol  a  binomial  distribution. 
|5)  the  dilference  ol  two  normal  means  [lor 
various  combinations  of  assumptions  about 
the  variances  ol  the  populations)  and  (6)  lor 
the  ratio  of  two  normal  variances, 
TESTS  OF  HYPOTHESES  about  (1)  a  normal 
mean,  with  various  cases  corresponding  to 
possible  assumptions  about  the  variance. 
12)  the  difference  in  two  normal  means 
(various  cases}  ^nd  (3)  the  ratio  of  two  nor- 
mal variances. 

TESTS  OF  THE  EXPONENTIAL  MEAN  (mean 
lime  to  lailure)  and  RATIO  OF  MEANS. 
TESTS    OF   THE    BINOMIAL   PARAMETER 
(proportion)     and     DIFFERENCE    OF 
PARAMETERS 

MULTIPLE  REGRESSION,  including  eslima- 
lion  ol  coefficienis,  estimation  ol  the  error 
variance,  and  lest  of  significance  of  the 
regression. 

ANALYSIS  OF  VARIANCE  for  oneway  and 
balanced  two-way  designs,  including  inter- 
action. 

The  software  is  user-lriendly,  aiioviing 
easy  recovery  Irom  errors  and  selecbon  ol 
alternate  analyses,  as  desired.  The  user's 
interaction  is  entirely  menu  driven,  with  er- 
ror recoverv  leatures.  An  extensive  user's 
manual  introduces  the  statistical  inference 
procedures  used,  and  gives  worked  ex- 
amples lor  each  situation  considered,  illus- 
trating typical  applications-  These  worked 
examples  serve  as  a  pattern  and  allow  the 
reader  to  check  his  use  of  the  programs. 
The  user's  manual  gives  complete 
documentation  ol  the  programs  and  pro- 
cedures used  in  them.  All  formulae, 
algorithms  and  procedures  are  listed  and 
referenced  to  commonly  available  statistical 
literalure, 

A  notable  teature  of  the  package  is  inclu- 
sion of  very  etiicient  routines  for  Ihe  compu- 
tation ol  probabilities  and  quantiles  lor  Ihe 
most  common  statistical  distribulions.  in- 
cluding normal,  binomial,  chi-square.  1  and 
F.  Thus  the  user  is  not  required  to  lurnish 
"tabular  values"  (rom  outside  sources 
when  performing  statislicai  analyses  with 
this  package.  STAT  complete  with  all  docu- 
mentation IS  $200, 

APPLE  11  APPLESOFT  and  at  least  one  drive 
APPLE  II  PASCAL  SYSTEM 
COMMODORE  32K  with  4040/8050  drive 
Radio  Shack  Mod  ill  and  CP/M  compatibility 
by  fall. 
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MACHINE  SPEED  "BASIC" 

CALC  v^as  designed  to  provide  pro- 
grammers ol  microcomputers  with  a  port- 
able language  that  combines  the  program- 
ming ease  of  the  higher  languages  wilh  the 
speed  and  flexibility  ol  assembler  program- 
ming, CALC  IS  totally  portable  on  the  Com- 
modore and  APPLE  11  computers.  This 
means  that  CALC  source  code  written  on  an 
APPLE  II  will  run  as  is  on  a  Commodore 
machine  and  vice  versa. 

When  possible,  CALC  makes  direct  use  of 
the  BASIC  ROM  macfiine  language  routines 
in  Ihe  Commodore  and  APPLE  II,  In  essence, 
CALC  provides  access  to  the  power  in  the 
BASIC  ROMs  without  Ihe  overhead  ol  the 
BASIC  interpreter  This  includes  floating 
point  arithmelic  and  all  library  functions.  In 
addition,  vije  have  added  leatures  that 
BASIC  does  not  have.  These  include  true  in- 
teger arithmetic  and  machine  speed  string 
handling  with  search  and  replacement 
leatures, 

CALC  can  fetch  and  replace  BASIC 
variables  and  arrays  by  name.  The  program- 
mer indicates  what  is  to  Oe  done  using  sim- 
ple keyword  commands  (ADD,  MULT,  SINE, 
etc  )  and  leaves  all  register  set-up.  bit- 
lormat  and  the  like  to  CALC,  The  object  code 
resulting  Irom  CALC  programs  is  very  com- 
pact and  consisis  ol  direct  calls  to  the 
BASIC  ROMs  or  to  the  CALC  runtime 
package, 

CALC  comes  m  4K  of  PROfil  containing 
a  relocatable  runtime  package  and  a  very 
complete  Trace  Window  feature  for  debug- 
ging CALC  programs  CALC  produces 
romable  6502  code  Ihat  does  not  require  the 
CALC  development  PROM  to  function.  Pro 
grams  wrilten  in  CALC  will  run  on  any  slock 
PET  or  APPLE  CALC  comes  with  a  60-page 
manual 

CALC  PROM  on  Commodore  IS  $115,  in- 
dicate 3,0  or  4.0  BASIC,  40/80  column 
screen  anc  rom  sockets  S9000,  $A000  or 
SSOOO 

CALC  on  APPLE  II  via  quality  siot  in 
dependent  board  is  S160, 

CALC  manual  by  itsell  is  SIO, 

CALC  lequres  Uoser.  Mae  Macro  fsastiki  (Tape  or 
Disk  vHSim) 


5@Ft5 


MULTI-KEY 
MACHINE  LANIiUAGE 

A  6502  machine  language  in-memory 
sorting  algorithm  ol  commercial  qualily  is 
available  as  part  of  a  new  uliiity  eprom  for 
PET  and  APPLE  owners.  Most  sorts  are 
accomplished  m  less  than  a  second  and  very 
large  sorls  lake  only  a  lew  seconds  The 
algorithm  is  a  diminishing  ihcremeni  inser- 
tion sort,  with  optionally  chosen  increments 
This  algorithm  has  the  advantage  of  being 
significantly  laster  (but  not  much  longer) 
than  simpler  ones,  and  signilicanlly  smaller 
(but  not  much  slower)  than  more  compli- 
cated ones.  Moreover,  unlike  some  of  Ihe 
more  complicated  algorithms,  there  are  no 
conditions  under  which  Ihe  performance  ol 
this  sort  degenerates  or  lails. 

SORT  is  intelligent  to  Ihe  degree  that 
almost  no  user  set-up  operations  are  re- 
quired. SORT  handles  integer,  lioating-point 
and  string  arrays,  as  well  as  multiple  dimen- 
sioned arrays  with  equal  ease  In  addition, 
multi-key  sorting  ol  string  arrays  has  been 
enabled.  The  user  may  specify  the  character 
within  a  string  lo  begin  sorting  on  and  how 
many  characters  are  to  be  evaluated.  SORT 
IS  capable  ol  perlorming  up  lo  twenty  ol 
these  multi-key  sub-sorts  (on  matches 
loundl  at  Ihe  same  time.  This  multi-level 
20-KEy  capacity  (or  string  arrays  greatly  in- 
creases Ihe  uses  to  which  SORT  can  be  put 

SORT  comes  as  part  ol  a  ulihly  EPROM 
that  also  includes  a  hi-speed  machine 
language  text  screen  dump.  Complete 
instructions  for  installalion  and  use  are  in- 
cluded 

SORT  IS  available  tor  large-keyboard 
PETS  Only.  One  ROM  will  work  for  BASIC 
3.0  &  4.0.  40  or  80  column  screens.  When 
ordering  you  need  only  lo  indicate  v^hich 
ROIVl  socket  address  in  PET  you  prefer 
EPROM  (S9000.  SAOOO  or  $8000).  PET 
SORT  EPROM  at  hex  S9000  location  if  you 
do  not  specify.  PET  EPROM  price  is  $55  00 
(postpaid) 

SORT  is  available  on  ihe  APPLE  li  via  a 
top  quality,  fully  socketed.  EPROM  board 
that  is  slot  independent.  The  MATRIX  APPLE 
board  includes  a  function  driver  thai  sup- 
ports up  to  16  EPROM  based  functions  in 
case  you  would  tike  to  use  your  own  EPROM 
m  place  ol  ours,  EPROM  board  with  SORT, 
texl  screen  dump  and  lunclion  driver  are  all 
slot  independent  and  may  be  used  in  any 
slot  except  0,  Price  APPLE  CARD  $110  00 
(postpaid) 


Matrix 

software 


315  Marion  Avenue.  Big  Rapids.  Mi   49307 
(616)  796-2483  or  796-0381 


Dealer  Inquiries  Invited. 


TOTAL  BUSINESS    SYSTEM 

BOOKKEEPER  was  designed  by  a  team  of 
accountants  and  businessmen,  and  Ihen 
programmed  especially  for  microcomputers. 
This  IS  not  hand-me-down  software  from 
mainframe  computers  BOOKKEEPER  is  a 
totally  integialed  management  and  account- 
ing system  that  is  available  now  on  Ihe  more 
popular  micro  systems. 

This  series  ol  interlocking  programs  is 
menu-driven  and  self-prompting  with 
relative  file  structure  implemented 
Ihrougtiout,  in  some  versions,  machine 
language  routines  have  been  used  to  pro- 
vide more  efficient  operation  The  system 
employs  stafe-of-the-arl  lechniques  and  has 
been  designed  to  be  user-friendly  No 
knowledge  ol  accounting  or  computers  is 
required. 

We  believe  the  system  can  be  operated 
using  hitle  more  than  the  screen  prompts. 
Bui  lor  completeness,  our  MATRIX  User 
Guide  itwo-inch  ring  binder)  contains 
almost  200  pages  ol  details  on  ihe  BOOK- 
KEEPER system  plus  a  helpful  introduction 
to  business  accounting  principles.  We  sug- 
gest that  you  send  for  a  more  complete 
description  of  BOOKKEEPER  or  invest  m  a 
copy  o(  Ihe  User  Guide  There  is  room  here 
only  for  a  general  description 

BOOKKEEPER  is  available  lor  bolh  SER- 
VICE and  RETAIL/WHOLESALE  lirms.  This 
total  business  system  contains  the  lollow- 
ing, 375  General  Ledger  accounts  (ten 
departments  with  accompanying  revenue 
and  expense  accounts).  Accounts  Receiv- 
able lile  with  maintenance  and  report  cap- 
abilities itOOO  accounis).  Payroll  with  ail 
federal  withholding  computed,  state  and 
local  income  lax  capabilities  lor  all  fifty 
stales  (100  employees):  Cash  Receipts  and 
Cash  Disbursements  programs  that  keep 
track  of  invenlory  sales  by  department. 
Sales  Tax  coniputalions.  Receipts,  and 
Invoices;  Accounis  Payable  file  with 
maintenance  and  report  capabilities  (fOO 
accounts)  The  system  also  generates  and 
prints  valuable  management  reports  such  as 
Departmental  Budgeting.  Profit  and  Loss 
Slalemenis  by  Department,  the  traditional 
Chan  of  Accounis  Summation  iTnal 
Balance),  and  Financial  Reports 

The  Retail/Wholesale  version  of  BOOK- 
KEEPER includes  a  perpetual  inventory  con- 
trol system  and  permits  poinl-of-sale 
invoices. 

BOOKKEEPER  IS  available  now  on  the 
COMMODORE  8032/8050.  4BK  APPLE  II -f 
and  RADIO  SHACK  Model  III  computers 
CP/M  compatible  version  available  by 
September 

The  BOOKKEEPER  system  retails  at 
$1000.00. 

Bookkeeper  manual  by  itsell  is  $20.00. 
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Apple  World 

3-D  ANIMATED  COLOR  GRAPHICS 
Written  in  .miacnjne  code 
The  program  made  lamcus  on  nalionai  T.V.< 
by  faul  LljIus 

APPLE  WOnLD  t^irns,  ytuf  A[iple  into  a  sophisticsled 
graohics  system  ca(5flt)iE'  !3f  dealing  animated 
Ifirec-dimenEionat  color  imgges,  ptojeclirg  Itiem  tn 
irue  perspective  on  the  screen,  folate  inem,  move 
irifiTf  closer  further  awa^.  and  many  other  exciting  and 
imaginative  things. 

Draws  abiects  with  es.OOli  points  per  side 

A  powerlut  screen -orifln:!)']  ic^u-ciior  is  included  to 
iaciiiiate image  tomaiioii   This  program  ws  rerentiy 
lealured  on  Tom  Snyde'S  Hnri.e  Time  Salurflay  TV 
Show  and  IS  now  avaiiaoiit  Tor  sale 

APPLE  WORLD'S  power'u;  eddor  is  so  easy  lo  use  ihit 
chiiarer  will  love  ii.  Vou  t:an  row  "sketch  '  your  dream 
house,  toal.car.or  fartaiy  emoirf  Then  view  it  as  it 
would  be  seen  Irom  lo.on&le«i.or  youcan  ZOOM  m 
uniii  trie  screen  is  diied  wiin  a  doorknob  Vou  could 
lliefi  go  inside  and  mnv?  Irom  i-oom  lo  room 
exan-ufiifig  fjimiure  pEat,einerii  as  youi  scteer  'olaies 
within  ihe  room  Images  or  speciftc  parts  ot  images 
can  easily  Be  saved  lo  disK  or  printer 

Does  ail  this  sound  like  scii-nceficlion'' 

Vou  wanllhinhsoalteryDJ  have  viSiied  Apple  World. 

INTRODUCTORY  PRICE  S59.95 

3p  |)i-i(tv'  m.inijial  >nriu.,tt'! 

For  4aK  Apple  II  or  Plus  wilh  Disk 


M 
^Snpergraphics 

■^BK     &  3D  GAIWb  DEVELOP '^liNT  SYSTEM  IN  COLO?! 
r  Oy  Paul  Lulus 

Watcfi  cotorful  dulterflys.  dirds.  iiy  across  your  Apple 
ur  Aiaii  Eci-een  with  true  3  dimersional  perspective 
Have  TQcket  ships  fly  OLit  al  you  m  Ihis  inerediOle  high 
?peed  grapiiics  pachagE  li-D  SUPERGRAPHICS"  is 
a  6502  mrachirn.  lang  jsge  program  thai  will 
interfile*?  lo  youi  Basic  -if  machine  language 
programs  or  games  U5irq  simple    DOS-like'  command 

Featur^l  include: 

■  Simple  image  enlry  Ihmugli  editor 

•  Objects  up  to  256  poms  per  side 

•  Uses  all  riii-fes  colors 
»  Allows  mrned  colored  leifl  5  graphics 

lor  promois  and  capiiors 

•  T'anslales  on  3  aices 
•  Individual  axis  scales 
'  21  difleien!  commands 

^^  •  Rslate  Obieci  T  4"  lo  :*0° 
increments  al  macbinn- -.ipoeds 

FOR  48K  APPLE  II  OR  PLUS  WITH 
DISK  II  S39.95FOR  DISK 

FOR  ATARI  800  WITH  40K  MEMORY 

(DISK   OPTIONAL) 

S39.95  FOR  TAPE 

k^  DTH£H  SOFTWARE 

^^-  APPLE  COMPUTERS 

Super  Space  Wars  ,  ,  .  ,   S  9  95 
k  Slates  &  Capitals      ,  9  95 

^A^        Moving  Poini 

"^B^        Aweragf t9  95 

'  Stock  Options 24  95 

Finance . .    ..       12  95 

V  Gohfis  T2  95 

^B^  COMMODORE  PET 

r  Stock  Oplions 24  95 

Finance 12  95 

k^       Bonds  12  95 

^Kt^       Stock  Analyser 22  95 

^B^      MOflgage 14  95 

T  Splice  Intruders  t'"eei.i 

Gamorjl  1979' 1 19  95 

1^  ^      Jury  Hostage- 9  95 

,^^W       Kentucky  Dertjy.' 

"^■^^        Roulette 995 

T  Alien  I  Q    TanJ( 995 

Submarine  Attach     .  9  95 

L^       Bailie  ol  Wtdway       .  7  95 

,^m/f       Laser  Tank  Baltic.    .  9  95 

^^^       Sw.iim \AB5 

r  BasebaJi 9  95 

Super  Starlrek.  M  95 

k^       PET  Music  Bo«.-  ?g  95 

^^■^r        Music  ComposHion  System  . . . 

"^P^  19  95 

r  Pearl  Harbor  Adventi.  n;  , .  . , . . 

14  95 

Super  Gomoku 9  95 
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Relational  Query  System  For  Management 


DATABASES:  YouVe  Heard  The  Hype  Before... 
Tlie  Truth  IS . . .  REQUEST  DELIVERS! 


DATABASE  MAINTENANCE— 

•  Uses  sophisticated  screen  formatting  &  data 
entry,  like  on  IBM  3270s' 

•  Generates  It's  own  screens  aulomatlcallyl 

•  Handles  records  up  to  4K  In  length,  using 
multiple  screen  "Pages"! 

•  Automatic  data  compression  for  Increased 
disk  capacity 

•  Uses  Superkram  (See  below)  access  method 
for  incredibly  fast  access,  LESS  THAN  .2 
SECONDS  FOR  A  RECORD! 

•  Automatic  index  creation.'maintenance 

•  Automatic  maintenance  capabilities 

•  "Goof-Proof"  error  handling 

•  Input  can  come  from  VISICALC"  or 
SOURCE'" 


DATABASE  SELECTION— 

•  Uses  screen  masks  to  form  query 

•  Provides  extensive  search  capabilities 

•  Search  arguments  can  include 
arithmetic/boolean  functions,  multi-field 
comparisons 

•  Queries  can  generate  input  for  automatic 
database  maintenance 

•  Queries  can  be  stored  In  "Query  Library"  and 
executed  from  menu  on  demand 

•  Any  number  of  fields  can  be  queried 
concurrently 

•  Query  output  can  be  routed  to  disk.  CRT 
report  formatter.  VISICALC"  or  SOURCE'" 

ONLY  $225 


DATABASE  REPORTING— 

•  Automatic  headlines 

•  Automatic  field  editing 

•  Report  fields  can  be  calculated,  sub-totaled  & 
cross-footed  in  any  manner  desired. 

•  Optional  counter  breaks  may  be  set 

•  Automatic  grand  totals 

•  Automatic  statistics 

REQUIREMENTS 

Superkram  (see  below)  and:  Commodore  Pet 
32K  (40  Of  80  col)  and  2040/4040/8050  disk  OR 
Apple  II  46K  with  Applesoft  or  language  system 
and  2  disk  drives  or  CORVUS. 


SUPER  KRAM 


Now  With  Multi-Key 

Capabilities 

For  Apple  &  Pet 


by  Ken  Germann 


Since  KRAM™  was  introduced  in  1979it  has  fast  become  known  asthequickest 
and  most  powerful  access  method  for  serious  Apple  and  Pet  users.  Now,  after 
hundreds  of  requests  we  have  added  MULTI-KEY,  MULTI-INDEX,  functions, 
as  well  as  increasing  processing  speed. 


IBM/370user^  have  vSAM  [Virtual  Starage  Access  Meihod}  ro 
provide  lasr  llexitiie  keyed-access  lo  meir  data  Now  SUP£fl  khaw 
(Keyed  iOandom  Access  Weihod>.  from  United  Software  oi  Ameriica. 
giwes  Apple  and  Pel  usee's  tng  same  llenjbiiiiy,  subslanliaKy 
incj-easing  the  piocessmg  power  of  ihe  Apple  and  Pet 

Ur'lii  SuPEF?  KRAM  the  only  ' V andom  access"  capabiJuTy  m  the 
Apple  and  Ptj|  consisted  at  a  crude  Ioitti  dl    relative  record' 
processing  While  this  is  usaDle  lor  very  simple  appi'icatjons.  n  latls 
lar  stiort  ot  the  needs  ol  today  5  uusmess  and  anaiyhcai 
apoticauons  Using  SUPER  KRAM  records  ma^  be  processed  bv 
an/  ore  ol  multiple  "Key '  values,  whictn  may  consist  ol  any  kind  ol 
data  numbers,  letter?,  special  cbaraciers  etc  Even  Apples  siong- 
awaited  DOS  3  J  doesn'i  have  anyttimg  like  tfi  s" 


KRAM'"  2.0  Regular  Features 

■  Wntlen  in  6502  macrme  code 
Basic  compaiiDie 

•  Create  Open  a  dataset 

•  PliI  record  by  hey 

■  Add  i&  detete  records  by  key 

•  Gel  any  reco'd  by  Full  P,ifltal  key 

•  Access  by  any  key  m  as  lithe  as  i  wc  (  1  sec  wilh  Corvuidtikj 

•  Supporls  mulliple  (JiJlcs 

■  fleaO  nei(l  or  previous  record 

■  Oynarrijc  Space  allocaiion 

•  Dynamic  ^pace  reclamation 

•  Dynamic  index  compression 

•  f\tes  never  need  recrganiiaiion 

•  Compatitjte  with  Janguage  syslemi 


KRAM'"  2.0  Only  S99.95 
SUPER  KRAM"  Only  $175 


ATTENTION-EXISTING  KRAM  USER^ 

St'fia  S15  with  origiMiil  disk  .iri.l  ROM  10  Ufiilpd  Soflw,lrL'  for 


:ip(o^(^fl  vetsicn  ol  Kmm 


SUPER  KRAM'S'"  Added  Features 

■  WULTIKEV  SUPPORT  -  Allowing  simultaneous  access  lo  a 
KRAM  liie  ay  more  than  one  key  field 

■  HI-SPEED  READ  -  Ttiis  feature  allows  increased  l.'O  Speed  up  lo 
60%  lasler  during  processing  ol  SUPEF^  KRAM  read  neKl.  read 
previous  pui  and  doleie  requests 

•  IMPROVED  INDEX  ARCHITECTURE  -  Allowing  (aster  inde« 
searchers  and  more  eHicient  disk  space  ulihiabon 

•  INTEGRATED  BASIC  COMMANDS  =  Allowmg  SUPER  KRAM'" 
commanas  to  be  coded  in-lme  with  Basic,  providing:  easier  u&age 
ol  KRAM  than  ever  before 

•  USER-SPECtFlA8L£  BUFFER  POOL  -  AMowing  the  user  lo 
specify  how  many  KRAM  hies  a^e  allowed  open  ai  ore  iime,  *iJ  I 
support  any  nurr^ber  of  KRAM  files 

•  LOGICAL  RECORDS  [KEVS  MAY  BE  NON-UNlOuEj  -  Records 
added  lo  the  KRAM  fiTes  are  imrne^diat'ely  accessible  by  any  of  lbe 
tJef»ned  keys  lor  \^^p  tile  [Aulomgtic  Upgrade) 

•  KRAM  20  files  are  lolaily  compatible  with  SUPER  KRAM 


750  3RD  Avenue, 

New  York  NY  10017 

(212)  682-0347  Telex  640055 


UNITED 
SOFTWARE 
OF 
AMERICA 


Look  for  the  RED-WHITE-BLUE 
United  Software  Display  at  your  local 
computer  dealer,  or  send  check  or 
moneyorder.  plus  $3.00  shipping  to: 

DEALER  INQUIRIES  INVITED 

REQUEST  &    KRAM  are  t(«d«  m«rks  ol  United  Software  ot  Am*rtca 
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Ask  The  Readers 


Robert  Lock  And  Readers 


Well  group,  here's  the  firsl  insUillmcnl,  You'll  fnid 
more  questions  than  answers  in  this  llrst  column, 
but  we  expect  to  balance  that  out  over  the  next  few 
columns.  Thanks  for  the  tremendous  response! 


"Please  (provide)  the  address  of  one  manufacturer  with 
the  company  name  of'Gillrotiix'  —  the\  manufacture  a 
RS-232  switch.  Thank  you. '^  Roy  Partridge 


The  robot  uses  tivo  motorized  wheels  wliich  draw 
seven  amps  each  at  twelve  volts.  The  two  ivheels  have 
separate  Reverse/Foiivard  controb,  connected  to  the 
Micro.,  so  tliat  it  might  Itnii  b\  l}utting  one  wheel  in 
forward  and  one  in  reverse.  The  speed  must  also  be 
Micro,  controlled  by  use  of  on/off  cycles.  However  the 
speed  for  each  leheel  does  not  have  to  be  .•ieporately 
controlled.  I  need  a  design  that  uses  up-to-date  Radio 
Shack  parts,  and  is  easy  to  build. "  A  Subscriber 


"One  of  the  many  programming  techniques  Atari  has 
neglected  to  mention  is  how  to  generate  pure  graphics 
tnodes  without  using  the  command  CR.X.  This  would  be 
most  desirable  lehen  leriting  A.ssemhly  programs  without 
the  use  oj  BASIC.  I  haiv  purchased  the  Atari  Hardware 
Manuals  and  found  nothing  to  solve  this  problem.  Any 
help  you  can  give  me  will  be  greatly  appreciated." 
Tracy  Principio 


"I  a  m  ten  years  old  and  have  an  Atari  800. 1  have  a 
problem  with  a  program  1  am  writing  and  would  like  to 
have  some  help.  1  have  an  airplane  flying  <iii  the  .'icreen, 
but  I  need  something  to  simulah'  motion.  One  .wlufion  is 
to  make  the  land  scroll,  or  to  make  mountains  and  hills 
appear  to  pass  you.  I  don't  knoxo  how  to  do  this,  and  if 
someorie  could  write  a  few  lines  for  this  I  would  appreciate 
it.  This  is  in  graphics  8.''  Joseph  Daniels 


"I  would  like  to  see  an  article  in  your  magazine  on 
television  interference  generated  by  microcomputers  and 
how  users  or  the  computer  manufacturers  have  solved  this 
problem.  I  own  an  Apple  II  with  48K  RAM,  disk,  and 
printer.  It  sits  idle  because  it  disrupts  television  channels 
2  and  5. 1  had  my  computer  modified  by  my  local  Apple 
dealer  but  the  modification  did  not  help  one  bit.  Am  I  the 
only  person  who  has  made  the  mistake  of  buying  an  Apple 
II  Computer  ami  who  lives  in  an  apartment  and  can't  use 
it  and  has  virtually  wasted  $3,000  in  cash?  To  sell  my 
Apple  seems  to  be  the  only  solution  but  I  stand  to  lose  a  lot 
of  money  to  replace  the  system.  I  have  tried  getting  help 
from  Apple  after  the  modification  was  made  in  vain.  Just 
sipi  me:  My  Apple  II:  It  does  not  compute!" 
Comments  on  interference?  With  the  FCC  currently 
working  on  applying  new  standards,  we'd  be 
interested  in  some  defmitive  comment. 


"/  am.  building  a  robot  and  have  run  into  a  problem  with 
the  speed  control  circuit  for  the  motorized  wheels.  I  have 
been  using  the  book  "How  To  Build  A  Computer  Con- 
trolled Robot"  for  reference,  without  much  succe.'is.  This  is 
due  to  the  fad  that  I  am  forced  to  use  Radio  Shack  parts, 
which  are  always  being  updated,  and  therefore  I  have 
trouble  finding  good  replacements. 


COMPUTE!  is  printing  more  and  more  advertising  for 

modems  to  connect  my  home  computer  to  a  lommunication 
net.  Why  .should  I  invest  in  a  modem?  What  exactly,  do 
the  vario us  'nets '  offer?  A  i ly  exa mples  ofac lual  PE Tl Apple 
use?  What  exactly,  can  I  do  zt'ith  a  modem  —  at  what 
costs;  at  what  actual  experience  speeds?  Wiial  are  the 
disadvantages  —  what  can  a  modem  not  da?  Any  value 
to  a  modem  if  not  net  connected? 

Surely  many  of  Compute's  readers,  as  well  as  some  oj 
your  advertisers,  would  like  a  thorough  research  oftlie 
Modem  investment  question  from  the  user's  viewpoint." 
Jim  Sercile 

Good  news,  Jim.  With  the  addition  of  Richard 
Mansfield  to  our  staff  you'll  see  us  doing  ever 
expanding  and  more  responsive  "keeping  up." 
We'll  be  starting  telecommunications  columns  in 
both  COMPUTE!  Magazine  and  Home  and  Educa- 
tional Computing!  Magazine  (our  ncv  VIC-20 
magazine)  .somelime  before  Fall.  We're  very 
interested  in  hearing  from  reader/users  on  all  the 
points  in  Jim's  letter. 


"7  recently  purchased  an  ATARI  800  computer.  Inside 
are  an  ATARI  I6K  module  and  a  Microtek  32K  module, 
giving  me  a  total  of48K  RAM.  However,  when  I  ran: 
PRINT  PRE  (0),  it  came  back  with  the  number  37,902. 
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v«J« 


CREATE-A-BASE 

CI7EATE-A-BASE  is  a  data  base  file  management 
system  that  enables  the  user  to  choose  the  numberof 
fields  needed  in  a  frie,  and  add  or  delete  fields  with- 
out disturbing  any  of  the  existing  data.  Once  a  file  is 
created  you  can  performanyof  30  functions.  Such  as: 

•  Interact  with  WORDPRO  4,  and  4  + 

•  Do  mathematic  functions  on  any  2  or  more 
fields 

•  Sort  650  files  in  only  1 9  seconds 

•  Merge  anysequential  file  into  a  CREATE-A- 
BASE  file,  and  output  a  sequential  file  from 

a  CREATE-A-BASE  file 

•  The  report  generator  has  the  feature  of  user 
defined  fields  and  field  width. 

•  Printouts  can  be  generated  by  values  such  as, 
greater  than,  less  than,  equal  to  or  in  alpha 

or  numeric  codes. 
You  don't  have  to  be  a  programmer  to  operate 
CREATE-A-BASE  on  your  COMMODORE  com- 
puter. Its  menu  driven  and  asks  you  questions  at  each 
step  as  you  perform  any  of  its  many  functions. 


WORD-CHECK 


WORDCHECK  Is  a  poor  spellers  dream  come  true. 
Designed  to  interact  with  WORDPRO,  it  has  2100 
root  words  and  suffixes.  In  addition  for  the  business 
and  scientific  user  it  has  the  capacity  for  900  industrial 
or  scientific  terms  which  you  load  in  yourself.  You 
have  a  total  vocabulary  of  approximately  7500  words 
at  your  fingertips.  It  simply  goes  through  the  text  and 
flags  any  words  that  it  doesn't  recognize. 
WORDCHECK  is  the  ideal  program  to  proof  your 
spelling,  whether  it  is  one  paragraph  or  a  1 00  page 
manual.  The  dictionary  is  versatile,  allowing  the  user 
to  add  or  delete  words.  You  can  design  the  program 
with  the  technical  terms  your  profession  uses,  even 
duplicating  the  table  and  tailoring  it  for  each  person 
in  your  office.  Let  WORDCHECK  do  the  work  for  you 
quickly  and  accurately. 


AVAILAKLK 

at  your  local  COMMODORE  dealer  or 
distributed  exclusively  in  CANADA  by 
B.P.I.  Micro  Systems,  Ltd. 
80  Barbados  Blvd.  #14 
Scarborough,  Ontario  M1J1K9 
Special  Dealer  Introductory  Package  Available 


Micro  Computer  Industries  Ltd. 


1520  E.  Mulberry.  Suite  170  Fort  Collins.  CO    80524 


1-303-221-1955 
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How  do  you  account  for  the  missing  UK?  The  computer 

store  where  I  bought  it  seemed  to  think  that  it  was  normal 
to  receive  such  a  sum  due  to  the  operatioru  oj  the  computer. 
I  really  don't  think  it  should  use  up  that  much  RAM. 
Please  inform  me  as  to  what  the  situation  is.  Thank  you." 
Dennis  Gallagher 

I  wonder  if  Atari,  Inc.  will  be  surprised  that  Dennis' 
48K  system  came  with  two  manufacturer's  RAM 
boards  ...  hum?  I  was.  Anvho\v,  wlien  \c)u  ran 
PRINT  FRE(O),  your  37,902  inditales  there's 
nothing  wrong.  That's  exactly  what  you  have  left  as 
free  memory  in  a  48K  system,  aliei'  Atari  lakes  up 
the  RAM  it  needs  for  "overliead"  —  the  operating 
system,  screen  memory,  BASIC,  etc. 


"/  have  au  Apple  II  Plus,  and  wa.\  wondering  if  you 
could  direct  my  letter —  or  me  —  to  an  Apple  User's 
Croup  Tape  Exchange. 

If  not,  I'll  understand  —  hnl  ij  there  is  one  around 
yon  know  about,  I'd  sure  like  lo  hear  from  them! 

I've  read  all  your  issues  —  and  am  glad  to  see  more 
and  more  Apple  news  all  the  time!"  Dave  Wright 


The  following  answers  and  tjueslions  are  excerpted 
from  that  of  a  reader  suggesting  a  cokmm  such  as 
this  one;  our  issue  announcing  this  column  had  not 
yet  reached  liim.  Small  workl,  right? 


"The  advantage,  I  think,  oj  a  f/iieslions  column  or 

columns,  is  that  oj  eliciting  contributions  finn  persons 
willing  to  respond  to  a  declared  need  to  know,  but  uncer- 
tain about  submitting  unsolicited  contributions.  For 
ntslancc,  the  Apple  XUnnials  are  not  voy  forthcoming 
about  HI  MEM,  and  I  wasn't  al  all  sure  that  HI  MEM 
set  low  to  protect  hex  data  in  high  memoiy  wouldnt  result 
in  siring  garbage  ovenvriling  the  arrays.  I)'  fact,  it 
doesn  't  and  I  have  a  Utile  program  designed  to  show  what 
happens.  But  maybe  everyone  else  already  knows.  It's  not 
the  sort  oJ  thing  I'd  submit  without  a  prompt.  Similarly, 
FRK((J)  is  virtually  instantaneous:  Does  it  really  do  a 
garbage  collection?  Answer:  No,  it  simply  resets  the 
garbage  pointer. 

OJ  course,  as  well  as  being  ivilling  to  supply  answers 
to  questions,  should  I  happen  to  knoiv  them,  what  I  really 
want  is  to  be  able  to  submit  fjneslions,  such  as  'Has 
anybody  J  igu  red  out  how  to  fix  the  bug  in  DliAW?'  "  R. 
R.'Hiatt 


"In  the  September-October  1978  Volume  1 .  Issue  6  of 
PET  USER  NOTES,  there  was  described  a  program 
called  "Index"  by  David  Wilcox  which  alloived  the 
original  PET  to  locate  by  fast -forward  any  program  on 
your  tape,  thereby  saving  much  hanting  tiihc.  However, 
this  does  not  work  on  the  new  4.0  machine.  Would 
appreciate  knowing  what  modifications  are  needed  ..."  .4 
Reader  <? 


LETTER  QUALITY  WORD  PROCESSOR  PRINTER/TYPEWRITER 


OLYMPIA  ES100 

REN  TEC  ES 

•  92  character  electronic 

•  Installation  In  15  minutes 

keyboard 

using  existing  ESlOO 

•  8  character  buffer  memory 

cables 

•  Dual  pitch.  10  and  12 

•  CMOS  logic  for  minimal 

•  17.5C.P.S. 

dram  on  ES100  power 
supply 

•  All  settings  from  keyboard 

•  Hi  or  low  true  status  bits 

■  AutO-  correcSion 

•  Accepts  RS232  serial  with 

•  Daisy  type  print  mechanism 

7  crystal  controlled  Baud 

•  Cartridge  ribbons 

rates 

•  14  1/8  inches  writing  line 

•  Accepts  Centronics  parallel 

•  1400  dealers  nationwide 

interface 

■  Selectable  auto,  line  feed 

OTHER  REN  TEC  PRODUCTS 

Centronics/ NEC  lo  Commodore/IEEE *  179 00 

Diablo  1640/1650  to  Commodore/IEEE 179.00 

Watanabe  Plotter  to  Commodof  e/l  E  E  E 1 95  00 

Watanable  Plotter  lo  RS232C 196.00 

Centronics  Paraltelto  RS232C 179.00 

IEEE  to  RS232C.  Uni-direclional 195.00 

IEEE  to  RS232C.  Bi-directional 296  00 

IEEE  to  Universal  Parallel  Device 159.00 

Diablo  630  to  Commodore/IEEE 295,00 

10  Key  Accounting  Pad  for 

Atari  400  4  800    5124.95 

CUSTOM  INTERFACES  «  CABLES  AVAII-ABLE 

DEALER  INQUIRIES  WELCOME 


$1495.00*  5295.00* 

TYPEWRITER  &  INTERFACE  INTERFACE 

The  Olympia  ES100  typewriter  connected  to  Apple, 
Atari,  NEC  or  TRS-80  with  the  Ren  Tec  interface  pro- 
vides for  the  first  time  a  truly  cost-effec':ive,  letter 
quality  printer  that  also  functions  as  a  typewriter, 
interactivley. 
"Commodore  IEEE  slightly  higher 


RENflliSflNGE  TEEtiNQLGGY  GQRPORflTIQN 


3347      VINCENT      ROAD 


PLEASANT      HILL 


CALIFORNIA      94523 


(415)930-7707 


SOFT 
ROM 


4096  BYTES  OF  SOFT  ROM 

STORE  MACHINE  CODE 
SOFTWARE  BEYOND  THE 
BOUNDARIES  OF  BASIC 

WRITE  PROTECT  RAM  WITH 
A  FLIP  OF  A  SWITCH 


STORE  VARIABLES  OR 
INDICES  OUTSIDE  OF  BASIC 

SOLVE  THE  CONFLICTING 
ROM  PROBLEM  BY  SOFT- 
LOADING  THE  APPROPRIATE 
ROM  IMAGES 


The  SOFT  ROM  is  compatible  with  any  large 
keyboard  PET/CBM  or  similar  2532  EPROM 
systems.  It  may  be  placed  in  any  ROM  socket 
to  give  the  user  room  for  machine  code.  If  the 
SOFT  ROM  is  placed  in  an  occupied  ROM 
socket,  the  user  can  transfer  the  PET/CBM  ROM 
into  the  on-board  ROM  socket  and  select 
between  ROM  and  RAM  to  manipulate  the 
Commodore  operating  system. 

Since  the  SOFT  ROM  places  write 
protectable  RAM  into  any  of  the  computer's 


ROM  sockets,  it  is  ideally  suited  to  use  as  a 
development  tool  to  test  ROM  or  EPROM  based 
software  systems  before  they  are  burned  in. 

Examples  of  software  presently  available 
for  the  SOFT  ROM  includes  BASIC  AID, 
UNIVERSAL  WEDGE,  SUPERMON, 
EXTRAMON,  USER  PORT  PRINTER  (Centronics 
parallel)  and  a  buffered  BACKGROUND 
PRINTER  routine. 

Installation  is  a  simple  plug-in  into  any 
available  ROM  socket. 


$1 29.00 


IKOM 


DISTRIBUTORS  OF: 

MUPET  •  DOUBLE-MUPET  •  SPOOLER 

THE  MANAGER  •  l|0  PRODUCTS 


CANADIAN  MICRO 
DISTRIBUTORS  LTD. 

.36.5  Main  St.,  Milton,  Ontario  L9T1P7 

416  878-7277 
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Computers 
And  Society 

Some  Speculations 
On  The  Well-Played 
Game ... 

David  D.  Thorn  burg 
Los  Altos,  CA 

For  starters  tliis  month,  those  of  you  who  use 
BASIC  niitfht  like  to  enter  and  rim  tliis  program: 

10  PRINT  "DO  YOU  PLAY  GAMES  ON  YOUR 
COMPUTER?" 

20  INPUT  A$ 

30  IF  A$<>  "YES"  THEN  GOTO  10 

40   PRINT  "I'M  NOT  SURPRIZED!" 

50  END 

What  is  tlie  point?  Simply  that  )ou  probably  an- 
swered YES  the  first  time  through. 

1  have  never  seen  a  computer  system  yet  which 
chdn't  have  games  on  it.  Over  the  years  games  have 
appeared  on  every  electronic  computational  device 
from  the  pocket  calculator  to  the  massive  computer 
systems  connected  to  tlie  Department  of  Defense's 
ARPA  net.  I1ie  creation  of  niechani/.ed  games  is  so 
natural  thai  I  wouldn't  be  siuprised  if  I  found  out 
that  Charles  Babbage,  in  the  i840's,  woidcl  have 
had  Ada  Byron  \srite  some  game  programs  if  lliey 
had  ever  finished  building  his  Analytical  Engine. 

1  don't  expect  that  this  comes  as  a  surprise  lo 
most  of  you,  since  ihe  small  computers  used  liy 
most  readers  of  COMPUTE!  provide  extraordinarily 
versatile  environments  in  which  to  play  games. 

There  are  several  reasons  lor  exploring  this 
i.ssue  this  month.  As  someone  who,  through  work- 
sliops  and  conferences,  lias  die  pleasure  of  inter- 
acting wilh  thousands  of  people  every  year,  I  hear 
comments  about  computer  lechnology  fiom  many 
sources  —  hobbyists,  educators,  parenis,  children, 
business  peoi)lc,  elc.  More  and  more  often  I  hear 
comments  which  disturb  me,  Ehesc  comments 
include: 

'Tin-  Imuble  with  fH^rsonal  comfnitcys  is  (hat  they  an- 
jivil  toys." 

"Why  ii'oiild  I  hu\  a  computer  made  hy : 

afler  all,  it's  just  a  ganw  in/irltiiii:" 

"I  (lo)i'l  u'aiil  pcrsomil  romfitttcrs  ni  my  classriKim. 
All  that  the  kids  do  on  itinn  is  play  sramcs  till  day  loii^." 

Now  I  have  no  problem  eoiuitering  any  of 
tliese  aignments  by  showing  that  any  personal 
computer  can  he  used  for  much  more  than  "playing 
games."  .\nv  of  vou  can  probably  Ifst  at  least  ten 
non-gamc-related  activities  appropriately  carried 


out  by  personal  computers. 

But  that  isn't  the  point  I  want  to  make.  What  I 
want  to  do  is  pause  and  ask:  "What  is  wrong  with 
playing  games?" 

Think  about  this  yourself  for  a  minute.  Many 
people  are  expressing  the  view  that  games  are 
somehow  less  valuable  applications  of  eomputer 
technology  than,  for  example,  a  program  which 
provides  cirill  in  irreducible  fractions. 

Well,  I'm  sorry  folks,  but  I  just  don  t  buy  ii. 

Those  of  you  experiencing  the  joy  of  ha\ing 
small  children  in  the  house  have  the  opportunity  to 
see  a  new  living  being  develop  into  a  conscious  self- 
aware  human  being  who  acquires  a  tremendous 


What  is  wrong 
with  playing  games? 


amount  oi  linguistic,  computational,  and  social  skill 
by  the  time  he  or  she  is  four  years  old.  The  skills 
which  are  a  significant  fraction  of  the  total  skills 
that  the  child  will  ac(|iiire  o\  er  his  or  her  entire  li- 
fespan. 

And  vet.  what  is  it  that  children  d(  during 
their  first  lour  years?  By  what  magic  do  they 
accomplish  so  much?  They  play  games,  that's  what. 

ft  ma\'  look  like  "Peek-A-Boo"  lo  \(ui.  but  lo 
an  infant  this  game  is  a  way  of  iielping  a  child 
discover  that  he  or  she  is  separate  from  the  parent 
and  from  tiic  environment.  It  become.'^  a  tool  for 
the  devclojjment  of  a  self  concept. 

.As  children  grow  older  ihev  continue  to  play 
games,  f  his  activity  continues  into  adulthood,  with 
ever  newei-  and  more  com]jlex  games  replacing 
games  which  have  been  "outgrown."  Came  playing 
spans  all  cultures  and  is  traceable  inU)  the  darkest 
reaches  of  human  history.  Playing  games  is  an 
intrinsic  part  t)f  the  human  experieiut . 

Does  this  mean  that  I  tiiink  children  should  be 
plaving  Asteroids  n;.v/mf/ of  learning  Analytical 
C.cometrv?  No,  of  course  not.  But  on  the  other 
hand,  I  reject  the  hy|)othesis  that  you'll  grow  hair 
on  vour  hands  if  you  play  S|)ace  Invaders  tot) 
much. 

Antl  what  this  all  brings  me  lo  is  the  guest 
commentary  by  Mr.  Alfred  D'Attore  which  a])- 
peared  in  COMPUTE!  two  months  ago. 

Mr.  D'Attore  suggested  that  computers  should 
he  used  in  the  classroom  for  "drill".  In  his  v\()rds. 
drill  is  supiDosed  to  tiu-n  students  off.  1  le  goes  on 
to  sav  that,  realistically,  there  isn't  any  othci'  way  lo 
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The  first  truly  user-friendly  Database  Management  System  available  at  reasonable  cost. 

This  suite  of  programs  is  ideally  suited  for  both  the  businessman  and  programmer,  for  use  with  the  CBM  8032. 
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For  the  Business  User 

•  Uses  Menu  Options  -  no  programming 
experience  needed. 

•  Lets  you  enter  data  in  the  form  you  wish, 
then  lets  you  recall  it  using  any  search 
criteria. 

•  Performs  predefined  calculations  on  the 
record  in  realtime  as  record  is  displayed  on 
the  screen. 

•  Reports  can  be  produced  using  any  search 
criteria  and/or  arithmetic  functions. 

•  Useful  applications  can  be  developed 
quickly. 

Typical  Applications  include  - 

•  Inventory  Control 

•  Mailing  Lists 

•  Accounting  systems 

•  Personnel 

•  Costing 

•  Gathering  test  data 

•  Budgeting 

•  Scheduling 

•  Examples  of  use  included  on  disk  supplied. 


As  Programmers  Tool 

•  Uses  standard  PET  ASCII  files. 

•  Software  interface  is  in  Basic  and  available 
to  the  programmer. 

•  No  special  disk  formatting  so  that  word 
processing  or  other  programs  can  be  stored 
on  the  same  disk. 

•  No  ROM  Based  Security  thus  no  need  to 
open  CPU. 

•  East  'n'  key  Sort/Merge  included. 

•  Eull  realtime  intra  &  inter  record  arithmetic 
performed  on  the  screen  as  record  is 
displayed. 

•  Professional  software  support  including 
unique  security  available. 

TRY  IT! 

IF  YOU  ARE 

NOT  SATISFIED  WITHIN  30  DAYS 

WE  WILL  RETURN  YOUR  MONEY 

$250.00 


OVD 


CANADIAN  MICRO 
DISTRIBUTORS  LTD. 

365  Main  St.,  Milton,  Ontario  L9nP7 
416  878-7277 


DlSTRiBUTORS  OF: 

MUPET  •  DOUBLE-MUPET  •  SPOOLER 

THE  MANAGER  •  I/O  PRODUCTS 
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INVENTORY 
CONTROL 

FOR  THE  COMMODORE  32K 
COMPUTER  SYSTEM 


1250  Items  Per  Disk.  (2040  Disk)  \  \  |  j 

Tracks  Sales  Figures  By  IVIanufacturer. 
Computes  Standard  Markup  Or  Percentage  E  ased 
On  Selling  Price.  |  ,   ^ 

Generates  Over/Under  Stock  Reports.         \  [  i 
Generates  A  Pliysical  Inventory  Report  In 
Location  Sequence.  |     !||  |  f   i 

Fast  Random  Access  File  Structure  Allows  Any 
Record  To  Be  Displayed  On  The  Screen  In  Under 
One  Second  For  Changing  Or  Deleting. 
Generates  Daily  Sales  Report,  Retail  Price  l|st, 
And  IVITD/YTD  Sales  Reports.   |     i  |  |  y 

Many  Other  Features  Found  Only  In  Large 
Mainframe  Inventory  Control  Systems. 


SEE  YOUR  NEAREST  COMMODORE  DEALER  FOR  A  DEMONSTRATION 

CMS  Software  Systems,  Inc. 


5115  MENEFEE  DRIVE  •  DALLAS,  TX  75227  •  214-361-0690 
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MAILING 
LIST  MANAGER 

FOR  THE  COMMODORE  32K 
COMPUTER  SYSTEM 


1340  Records  Per  Disk.  (2040  Disk) 
Prints  Labels  One  Up,  Two  Up,  Three  Up,  Four  Up 
Or  The  Same  Label  Two  Across,  Three  Across,  Or 
Four  Across. 
Fast  Machine  Language  Sorting  Of  File  By 
Company  Name,  Customer  Name,  City,  State,  Or 
Zip  Code  Plus  Secondary  Sorting  Within  Any  Field 
Such  As  Company  Name  Within  State. 
Record  Selection  Code  Allows  Printing  Of  Sub- 
Files  Within  Master  File.ffl^         ^^^n^isfc^ 
Can  Be  Used  With  Word  Pro  3/4  For  Printing  Form 
Letters,  Etc.  ^ 

Fast  Random  Access  File  Structure  Allows  Any 
Record  To  Be  Displayed  On  The  Screen  In  Under 
One  Second  For  Changing  Or  Deleting. 


SEE  YOUR  NEAREST  COMMODORE  DEALER  FOR  A  DEMONSTRATION 

CMS  Software  Systems,  Inc. 


5115  MENEFEE  DRIVE  •  DALLAS,  TX  75227  •  214-381-0690 
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acquire  these  basic  skills.  His  experience  is  that 
children  benefit  fiom  drill -disciplined,  repeated, 
old-fashioned  drill.  Tiie  alternative  to  this  is  the 
use  of  computers  for  "endless,  ever-present 
games." 

I'll  bcl  that  I  can  list  quite  a  few  games  in  my 
library  wiiich  provide  iremciidoiis  opportunity  for 
math  diill,  but  which  do  it  in  a  way  in  which  the 
acquisition  of  these  computational  skills  becomes  a 
necessary  part  of  wiiniing  the  game.  I  am  con- 
trasting this  type  of  game  environment  with  the 
"sugar  coated"  CAI  drill  programs  which  inter- 
sperse rote  computational  drill  with  "cutesy" 
graphics  (happy  faces  when  you  gel  the  right 
answer,  etc.).  No,  what  I  am  talking  about  is  the 
kind  of  game  which  gives  more  opportiniitie.s  for 
the  acquisition  of  compuialiona!  skills  than  many 
so-called  drill  programs,  but  which  are  as  appealing 
as  many  of  the  traditional  computer  games  which 
Mr.  D'Attore  would  prcier  not  seeing  in  schools. 

An  acquaintance  of  mine,  Ihomas  Malone, 
wrote  liis  PIi.D.  thesis  on  this  very  topic.  His  work 
{entitled:  "What  Makes  Things  Fim  to  Learn?  A 
Study  of  Intrinsically  Motivating  Computer 
Games")  is  concerned  with  the  study  of  what  it  is 
that  glues  kids  to  the  computer  for  liours  on  end. 
Perhaps,  by  finding  the  key  to  unlock  the  secret  of 
traditional  computer  games,  he  would  be  able  to 
generate  a  set  of  design  criteria  u.seful  to  those 
interested  in  writing  intrinsically  motivating  educa- 
tional programs. 

Working  with  many  children  in  several  schools, 
Tom  tried  out  several  modifications  of  some 
popular  computer  games.  He  tested  children's 
interest  in  the  games  when  they  consisted  of  pure 
non-interactive  drill,  and  when  the  games  were 
successively  enhanced  by  the  addition  of  perfor- 
mance feedback,  scoring,  constructi\c  feedback, 
fantasy,  sound,  and  graphics.  He  learned  a  lot 
from  the.se  experiments.  For  exam]ile,  he  found 
that  the  best  goals  are  often  practical  or  fantasy 
goals  (like  reaching  the  moon  in  a  rocket)  ratlier 
than  simply  goals  of  using  a  skill  (like  doing  arith- 
metic problems).  He  found  that  fantasies  often 
make  programs  more  interesting  if  they  are  relevant 
to  the  skills  being  u.sed.  He  found  (hat  coiistructive 
feedback  is  important  for  educational  programs. 
He  found  that  sound  and  graphics  are  important 
—  especially  to  the  extent  that  they  can  extend  the 
representational  system  which  the  program 
creates. 

A  sheet  ftill  of  coinpuler  generated  raw  addi- 
tion problems  falls  U)  meet  all  of  these  criteria,  in 
my  estimation. 

There  is  much  to  be  said  for  thinking  of  games 
in  a  larger  context  as  well.  One  jjerson  who  has 
devoted  imtch  effort  to  this  task  is  games  designer 
and  philosopher  Bernard  DeKoven,  author  ol  llie 
(unforlinialely  out  of  |irint)  book.  The  Well  Played 


Game  (write  Anchor  Press/Douljleday  to  see  if  they 
plan  to  reissue  iti).  This  book  deals  with  the  .sensa- 
tion of  "'wellness"  which  we  feel  when  a  game  is 
really  working  for  all  the  pla)'ers. 

The  common  thread  which  binds  ,ill  members 
of  the  play  connnunity  is  this  tjuest  for  ihe  well- 
played  game  —  the  feeling  that,  whate\  er  our 
skills,  we  are  playing  well.  It  doesn't  matter  if  we 
are  ])laying  clie.ss  or  volleyball,  the  whole  reason  we 


...  they  help  us  to 

maintain  our  self  concept 

and  our  relationship 

with  others. 


participate  in  games  is  to  gain  a  connection  with 
the  magical  feeling  we  gel  when  the  game  is  working 
for  us.  When  we  are  in  this  state,  we  an-  not  playing 
for  the  score  (although  score  can  be  im])ortanl);  we 
at-e  not  having  to  win  (although  winning  can  be 
important);  we  are  playing  to  maintain  this  feeling 
of  excellence  in  our  connection  with  the  game  and 
with  whomever  we  are  jjlayiiig  at  the  lime. 

liecause  of  this,  games  take  on  even  more 
importance  in  the  sense  that  they  help  us  to  main- 
tain our  self  concept  and  otu"  relationshi})  with 
others.  As  Bernie  shows,  play  is  important  for 
everyone,  adult  and  child  alike.  Through  games 
we  become  a  community.  Through  we  1-played 
games  we  are  able  to  acknowledge  our  ()wn  and 
each  other's  genuine  claim  to  excellence. 

With  this  view  in  mind,  tliink  of  your  own 
experience  with  games.  When  you  reir.ember  a 
game  do  you  remember  the  score,  or  do  you 
remember  that  terrific  play  wiien  you  ahnost 
dropped  the  ball  and  laked  out  your  ojjponent  to 
pull  off  a  perfect  shot  from  halfway  across  the 
ctnirtr'  Or  the  time  when  the  in\aders  were  on  the 
bottom  row  of  the  screen  and  you  knot  ked  them 
all  out  to  get  a  bonus?  Or  the  time  your  partner 
made  a  grand  slam  in  voiu"  Tirst  perfectly  bid 
hand? 

Whatever  the  game,  whether  the  players 
number  from  one  to  a  hundt  ed  or  mot  e,  we  who 
play  have  a  coimnon  goal  —  playing  wl-11.  This 
feeling  is  the  ultimate  motivator.  It,  more  than 
anvthing  else,  makes  us  want  to  excel  —  makes  us 
forget  anything  else  we  are  doing  —  and  provides 
us  with  more  incentive  for  acquiring  skills  than  any 
rote  drill  environment  could  ever  providt-. 

Is  my  compiiier  a  game  machine?  You  bet  it  is! 

Next  month  ... 

In  August  I  will  describe  a  few  exceptional  games 
whi(  h  I  have  found  to  be  quite  useful  in  skills 
ac(iuisilion.  ^ 
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At  long  last  A  complete  line  of  Voice  I/O 
peripherals  for  Commodore  computers,  starting 
at  $119. 


Let's  face  It .  Voice  I/O  is  a  faaclnat  ing  and  efficient  way 
to  communicate  with  computers.  And  now,  thanks  to 
VO ICETEK.  Voice  1/ 0  peripliErals  are  easily  available , 
easy  to  use  and  very  affordable. 

If  you  own  a  Commodore  compuier,  we  give  you  a 
clioice  of  three  different  peripherals  that  will  enable 
your  compuier  to  understand  your  spoken  commands. 
And  two  of  these  peripherals  will  talk  back. 

What's  in  a  name. 

We  call  each  member  of  our  family  of  Voice  I/O 
peripherals  COGNIVOX.  from  COGNItive  and  VOX. 
It  helps  you  remember  that  when  you  talk, 
COGNIVOX  thinks  about  what  you  say. 

The  top-of-lhe-llne  COGNIVOX  model  for  the 
PET/CBM  is  VIO-1D02.  It  offers  natural  sounding  voice 
output  and  excellent  performance  as  a  speech 
i«cognizer.  It  costs  only  $249. 

If  the  quality  of  voice  output  is  not  Important  for  your 
application,  then  you  can  save  SIOO  by  ordering  VIO- 
432.  Priced  at  $149,  VIO-432  is  ideal  for  hobbyists  or 
persons  mainly  interested  in  speech  recogniton. 

Finally,  if  you  have  an  BK  PET.  there  Is  insufficient 
memory  for  voice  response,  so  we  offer  a  recognition- 
only  COGNIVOX.  model  SR-IOOP.  It  costs  SllS, 
making  it  the  lowest  priced  speech  recognizer  ever 
offered  for  sale.  Yet  its  performance  rivals  that  of  units 
selling  at   much  higher  prices. 

Which  brings  us  :•>  the  next  point  we  would  like  to 
make,  namely,  why  we  offer  so  much  performance  for 
so  little  money. 

It's  the  technology. 

Our  Voice  I/O  peripherals  are  based  on  a  technological 
breakthrough  that  made  it  possible  to  compress  the 
required  electronics  onto  a  single  integrated  circuit 
chip.  We  are  the  only  company  so  far  that  has  achieved 
this  remarkable  feat.  No  wonder  we  offer  such 
reasonably  price  voice  peripherals. 


4AAf^Y'^f^'^ 


In  addition,  COGNIVOX  uses  an  exclusive  non-linear, 
learning  pattern  matching  algonlhm  to  do  speech 
recognition.  Which  means  more  reliable  performance 
and  ea.se  of  use. 

What  makes  it  talk. 

COGNIVOX  digitizes  and  stores  In  memory  (using  a 
data  compression  algorithm)  the  voice  of  the  user.  This 
givea  three  major  advantages: 

First,  there  are  no  restrictions  to  the  words 
COGNIVOX  can  say.  If  you  can  say  it  [or  sing  it.  or 
whistle  it  for  thai  matter)  your  computer  can  do  il  loo. 
Second.  It  is  very  easy  to  program  your  favorite  words: 
just  say  them  in  the  microphone, 
Third,  you  have  a  choice  of  voices,  male,  female,  child, 
accents,  etc.  this  unprecendented  flexibility  offered  by 
COGNIVOX  is  a  must  in  the  personal  computer 
environment.  Voice  synthesizers  and  (he  "talking 
chips"  do  not  offer  this  flexibility  and  therefore  we  feel 
they  are  not  suitable  for  use  with  personal  computers. 
In  addition,  voice  output  quality  can  be  poor, 
especially  for  synthesizers.  In  thai  respect,  VIO-1D02 
is  clearly  superior  to  anything  else  on  the  market  and  it 
is  a  must  If  voice  quality  is  important  (for  examplSr 
business  a  p  plica  t  ion  a]. 


Some  specifications 

COGNIVOX  can  be  trained  to  recognize  words  or  short 
phrases  drawn  from  a  vocabulary  of  up  to  32  entries 
chosen  by  the  user. 

Training  COGNIVOX  to  your  vocabulary  is  easy.  All 
you  have  to  do  Is  repeat  the  words  three  times  at  the 
prompting  of  the  computer. 

If  you  would  like  to  have  COGNIVOX  respond  to  more 
than  32  words,  you  can  have  two  or  more  vocabularies 
of  32  words  and  switch  back  and  forth  between  them 
using  a  word, 

The  Voice  output  vocabulary  can  have  up  to  32  words 
phrases.  Data  rale  is  approximately  700  byte  per  word. 


Ready  to  listen* 

All  COGNIVOX  units  arc  complete  Voice  I/O 
peripherals  ready  to  plug  In  and  use.  They  come 
assembled  and  tested  and  they  include  microphone, 
cassette  with  software  and  manuals,  VIO  units  include 
built-in  ipeaker  and  amplifier  [yes,  CB2  is  also 
connected  for  music  and  sound  effects]. 

They  all  plug  into  the  user  port  and  they  receive  their 
power  from  the  cassette  port  except  VIO-1002  which 
uses  a  wall  transformer  supplied  with  the  unit. 


Oser  Manual 


Easy  to  use. 

Ail  you  need  to  gel  COGNIVOX  up  and  running  is  to 
plug  it  in  and  load  one  of  the  programs  supplied.  Load 
the  demo  program  and  start  talking  to  your  computer 
right  away.  Or  load  one  of  the  games  and  discover  the 
miagic  of  voice  control. 

It  Is  easy  to  write  your  own  talking  and  listening 
programs  too,  A  single  statement  in  BASIC  Is  ail  that 
you  need  to  say  a  word  or  to  recognize  a  word.  Full 
instructions  on  how  to  do  It  are  given  in  the  manusL 

Works  with  all  versions. 

COGNIVOX  will  work  with  all  versions  of  the 
PET/CBM  line.  Old,  new  and  newer  ROMs.  At  least 
16K  of  RAM  is  required  (SR-IOOP  will  work  with  SK  of 
RAM]. 

If  you  have  a  disk  system,  you  can  use  it  to  save 
vocabularies.  Instruclions  are  given  in  the  manual. 

Many  uses. 

With  COGNIVOX  your  imagination  Is  not  the  limit  as 
the  saying  goes.  It  is  the  starting  point.  Cognlvox  is  a 
super  toy,  an  educational  tool,  an  aid  to  handicapped,  a 
data  entry  device  while  hands  and  eyes  are  busy,  a 
foreign  language  translator,  a  sound  effects  generator, 
a  telephone  dialing  device,  an  answering  machine,  a 
talking  calculator.  Using  the  TEEE  4BB  part  you  can 
control  by  voice  Instruments,  plotters,  test  systems. 
And  all  these  devices  can  talk  back  to  you,  telling  you 
their  readings,  alarm  conditions,  even  their  name. 

Order  your  COGNIVOX  now. 

To  order  by  mail,  give  us  the  model  number  of  the  unit 
you  wish  to  order,  the  make  and  model  of  your 
computer  and  your  name  and  address.  Enclose  a  check 
or  money  order  and  make  sure  to  include  S5  for 
shipping  andhandling.CA  residents  please  add  6%  tax. 
You  may  also  order  by  phone  and  charge  it  to  your 
Master  Charge  or  VISA.  Our  phone  number  is  (BOS) 
085-1654  SAM  to  5PM  PST,  Monday  through  Friday. 
Foreign  orders  are  welcome,  please  add  10%  for  air 
mail  shipping  and  handling.  Payments  must  be  in  US 
funds.  COGNIVOX  is  backed  by  an  120-day  limited 
warranty  against  manufacturing  defects. 

VOICETEK 

P.O.  Box  388,Goleta,  CA  93116 
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Guest  Commentary 


The  "World  Computer" 


Marvin  DeJong 

The  School  Of  The  Ozorks 

Pf.  Lookout,  MO 


Editor's  Note:  Most  of  you  arc  familiar  ivitli  Ahn-vin's 
work  in  till'  area  of  problem  soh'ingxt'/th  machine 
language.  We  felt  this  commenta)y  raised  some  inter- 
esting questions.  Comments?  RCL 

From  My  Soapbox 

A  few  days  ago  I  sat  down  b)'  iii)'  friendly  personal 
computer  to  load  a  cassette  tape.  The  tape  contained 
a  program  intended  for  educational  use  at  the 
elementary  school  level.  The  loading  instructions 
were  complex.  Two  hoius,  three  tape  recorders, 
and  two  computers  later,  I  had  succeeded  only  in 
obtaining  the  company  logo  on  the  video  monitor. 
A  phone  call  to  the  marketing  firm  brought  the 
helpful  remark  "we've  never  had  that  problem 
before."  My  experience  with  tapes  makes  me  doubt 
that  statement.  If  a  professional  computer  user 
with  several  computers  and  tape  recorders  cannot 
get  a  program  to  run,  what  do  you  think  will 
happen  in  a  third  grade  situation  when  20-30 
howling  kids  are  left  to  themselves? 

The  computer  industry,  including  software 
vendors,  must  recognize  that  entertainment  grade 
cassette  instrumentation  is  completch  unsuitable 
for  transporting  or  storing  computer  programs.  At 
least  that  is  true  in  the  conle.xt  of  an  educational 
environment, 

I  am  quite  happy  with  our  new  computer.  It 
has  the  latest  disk  operating  system.  Of  course, 
since  most  of  the  disks  that  are  commercially 
available  have  a  different  format,  I  must  boot  two 
disks  to  use  one.  My  dealer  is  having  difficulty 
finding  the  right  lower-case  adapter  for  the  word- 
processing  system  I  requested  because  I  ha\'e  the 
very  latest  revision  for  this  computer  and  disk 
system.  I  also  just  received  a  complimentary  copy 
of  a  liook  containing  a  disk  witli  a  lot  of  very  nice 
programs  (jn  it,  for  my  particular  brand  of  com- 
puter. Unfortunately,  most  of  them  won't  work 
because  they  were  written  for  a  different  version  of 
BASIC,  Is  this  planned  obsolescence? 


The  problems  mentioned  above  were  accept- 
able nuisances  when  the  industry  was  in  its  infancy. 
The  same  problems  are  no  longer  acceptable.  A 
third  grade  teacher  is  not  a  computer  expert,  and 
the  computer  will  soon  be  gathering  dust  in  a 
corner  if  it  is  not  easy  to  load  and  run  programs. 
Furthermore,  the  educational  system  in  (hiscoimtry 
is  already  in  financial  difficulty.  The  tremendous 
expense  involved  in  operating  and/or  upgrading 
different  systems  will  stifle  the  use  of  computers  at 
many  levels. 

Perhaps  up  until  now,  industry  competition 
has  l)een  fruitful,  Ijut  competition  and  ctjoperation 
need  not  be  mutually  exclusive  forces  in  terms  of 
progress.  VV''hy  not  think  about  a  "world  computer," 
designed  for  personal  and  educational  use?  This 
computer  would  be  designed  by  people  from  (say) 
"the  big  four"  personal  Computer  manufacturers 
(Tandy,  Apple,  Commodore,  and  Atari).  Each  of 
the  four  could  market  their  version,  but  all  versions 
would  be  completely  hardware,  software,  and 
graphics  compatible.  They  would  all  loid  the  same 
disks.  They  would  not  have  cassette  I/O,  but  they 
would  come  complete  with  one  disk  drive.  Color 
might  be  optional.  Primer  interfaces  would  be 
compatible  and  networking  would  be  supported. 

Try  to  imagine  the  impact  of  such  a  develop- 
ment on  personal  compiuing,  particularly  in  the 
educational  world.  It  is  diflicult  to  think  of  a  single 
negative  effect.  Computer  manufacturers  would 
still  be  able  to  manufacliue  their  own  "other" 
computers  for  specific  applications,  but  an  inex- 
pensive computer  with  vast  amounts  of  software 
would  be  available  to  many  more  individuals  than 
is  now  the  case. 

Where  would  personal  transportation  be  now 
if  aiUomobile  nianufaciurers  had  produced  a 
world  car  with  universal  parts  available  everywhere? 
Probably  they  would  not  be  in  financial  (rouble, 
and  the  use  of  a  car  would  ])robabIy  not  he  confined 
to  a  .unall  percentage  of  tlie  world's  population.      © 
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Announcing 


COMPUTE! 
BOOKS 


Since  our  first  issue  in  \he  Fall  of  1979, 
we've  provided  more  Atari  and  PET/ 
CBM  information  to  owners  and  users 
tlian  any  other  magazine  in  the 
industry. 

Now  we're  taking  the  best  of  our 
published  material  adding  new 
material  and  putting  it  ail  together 
into  our  first  two  bool<s; 

COMPUTEI's  First  Book  Of  Atari  and 
COMPUTEi's  First  Book  Of  PET/CBM 

will  be  aval  table  in  late  July.  With  a 
design  intended  to  make  them  easy 
to  use,  and  contents  aimed  at  assist- 
ing a  range  of  users  from  beginners  to 
advanced,  you'll  find  that  OOIVIPUTE! 
Books  will  become  a  valuable  and 
permanent  addition  to  your  refer- 
ence library.  But  what  else  would  you 
expect?  After  all,  we're  the  resource. 

Reserve  your  copy  today  at  your 
COMPUTE!  dealer  If  one's 
not  handy,  use  the  coupon 
below  or  call  TOLL  FREE 
1-800-227-1617,  Ext.  401. 


COMPUTEi's 
FIRST 
BOOK  OF 
ATARI® 


COMPUTEI'S 
FIRST 
BOOK  OF 
PET/CBM 


TM 


We  accept  MasterCard  and  VISA 
Dealer  Inquiries  Invited 


ATAPl '  Reglst0[6d  rrocteiTrark  of  Aton,  Ire 
F>EI;CBM'  Itodematlc  o(  ConvTKidor©  BuSifiess  Wochinev  Inc 


Please  send  me 


copy(s)  of  COMPUTEI'S  First 


Book  Of  Atari  (?(■  $12,95  each. 


Please  send  me 


copy(s)  of  COMPUTEi's  First  Book 


Of  PET/CBM  (w  $12.95  each. 

Name 

Address 

Cily 


State 


.Zip. 


Please  add  $2.00  for  postage/hondling  for  each  book  ordered. 

Payment  must  be  in  US  funds.  S1 00  billing  fee. 

All  orders  from  outside  US  and  Canada  must  be  prepaid. 
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The  Beginner's  Page 


Richard  Mansfield 
Assistant  Editor 


When  you  first  see  BASIC,  many  of  the  ideas  and 
techniques  of  programming  are  pretty  straightfor- 
ward. GOTO  100  is  easy  enough.  You  are  telling 
the  computer  to  jump  from  wherever  it  might  be 
in  a  program  to  the  instructions  on  Hne  100. 
PRINT  "LARRY"  is  not  too  hard  to  grasp.  (The 
word  PRINT  is  used  because  BASIC,  in  the  early 
days,  sent  program  results  —  "output"  —  to  a 
teletype  machine  instead  of  a  TV.  PRINT  used  to 
describe  what  it  did  exactly.  Now,  perhaps,  another 
word  would  be  more  correct,  but  it's  too  late  to 
change  things  at  this  point. 

In  general,  though,  BASIC  words  are  more  or 
less  like  what  they  mean  in  English.  And  ideas  such 
as  "less  than"  or  "more  than"  are  pretty  familiar 
concepts.  Its  just  a  matter  of  learning  the  words 
and  punctuation  of  BASIC  and  you  re  programming 
(telling  the  computer  what  you  want  it  to  do). 

But  some  BASIC  words  are  not  so  simple. 
RND,  ON  GOTO,  VAL,  GOSL'B,  STRS,  DIM, 
DATA,  are  words  which  refer  to  ideas  generally 
found  only  in  the  computing  world.  They  take 
some  getting  used  to  and  some  practice.  The  best 
way  to  understand  these  computer  words  is  to  work 
with  them  in  sliort  programs  and  watch  what  they 
do.  What  effects  do  the)'  have?  How  are  they 
useful  in  getting  jobs  done? 

Probably  the  most  difficult  BASIC  word  (or 
"statement")  to  quickly  understand  is  ON  GOTO.  It 
usually  appears  something  like  this:  10  ON  A 
GOTO  500,  600,  700.  We  know  that  GOTO  means 
to  jump  to  a  certain  line  number.  But  here  we  are 
giving  the  computer  three  choices  of  line  numbers 
to  jump  to.  How  will  it  decide?  The  decision  de- 
pends "ON  A."  "A"  in  this  line  is  a  variable.  That 
means  that  it  is  just  like  a  box  and  what's  in  BOX  A 
could  be  any  number.  The  contents  of  the  box  we 
call  "A"  vary  —  sometimes  A  is  15  and  sometimes 
A  is  233.001  and  so  forth,  A  is  variable,  it  changes 
whenever  something  in  the  program  causes  it  to 
change. 

The  ON  GOTO  statement  makes  the  computer 
look  up  A  to  see  what  is  "in"  A.  If  A  is  the  number 
one,  then  the  computer  will  GOTO  the  first  line 
number  in  the  list  (500).  If  A  is  three,  then  we  will 
GOTO  line  700.  We  only  put  three  line  numbers  in 
our  program  (500,  600,  700)  so  A  had  belter  not  be 
a  5  or  a  -12.  It  must  be  one,  two,  or  three.  We 


could  have  written:  10  ON  B  GOTO  40.  50,  60,  70. 
In  this  case,  the  computer  would  look  up  variable 
"B"  to  see  which  number  between  one  and  four 
was  "in"  B,  Then  it  would  GOTO  the  correct  line 
number. 

Let's  try  a  short  program  to  illustrate  this  idea 
(this  sort  of  programming  is  called  "multiple 
branching"): 

10  INPUT  A 

20  IF  A  <  1  OR  A  >  3  THEN  GOTO  10 

30  ON  A  GOTO  500,600,700 

500  PRINT  "WE  WENT  TO  LIKE  500" 

501  END 

600  PRINT    "V/E   WENT   TO   LINE    600" 

601  END 

7C0  PRINT  "WE  WENT  TO  LINE  70  0" 

INPUT  makes  the  computer  stop  and  wait  for 
something  to  be  typed  in  from  the  keyboard 
(followed  by  a  carriage  return).  Line  20  is  a  common 
programming  technique  which  checks  to  see  if 
wrong,  illegal,  things  were  typed  in.  Since  we  don't 
want  any  numbers  except  otie  through  three  (that's 
all  we  provided  for  in  our  list  on  line  30)  —  we 
have  the  computer  go  back  to  line  10  for  another 
INPUT  if  the  first  one  was  illegal. 

We  had  to  put  two  END's  in  or  the  program 
would  have  just  gone  on  to  print  each  message  in 
turn.  END  stops  everything,  as  you  would  expect. 
This  "multiple  branching"  is  very  ofler  used  when 
you  want  to  allow  a  choice  among  diiferent  parts  of 
a  program.  Let's  say  that )  cm  have  a  program 
whicli  is  realh'  several  programs  in  one.  It  can  do 
four  different  tilings,  })lay  fc3ur  different  card 
games.  Common  programming  practice  would 
begin  such  a  program  with  a  listing  of  the  options. 
It  would  say,  "Please  choose:  1.  Poker  2.  High-card 
3.  Bridge  4,  Patience."  When  this  menu  came  onto 
the  screen,  the  user  would  type  in  a  number  between 
one  and  four.  This  is  perfect  for  the  0\  GOTO 
statement. 

A  similar  statement  Is  ON  GOSUB.  but  we'll 
deal  with  the  important  topic  ni'.\iibroiiiinrs  in  the 
futtire.  For  now,  try  an  experiment.  See  what 
would  happen  with  our  short  multiple  branching 
program  ii  you  typed  in  i  .5  as  input  instead  of  an 
integer  (whole  number).  Q 


Perfectly  Balanced 


educational  software 


MICRO-ED 


More  than  200  instructional  programs 


Unless  otherwise  specified,  each  one  can  be 
purchased  for  *7.95 


You  may  wish  to  order  tapes  by  the  MICRODOZEN.  Any  twelve  $7.95  tapes  can  be 

purchased  for  $84.00. 


Ml  programs  work  with  any 
8K  PET,  old  or  new. 


Send  for  free  catalogue: 

MICRO-ED,  Inc.  •  P.O.  Box  24156  •  Minneapolis,  MN  55424 
or  telephone  us  at  (612)  926-2292 


PET  is  the  registered  trade- 
mark for  Commodore  Busi- 
ness  Machines.  Santa 
Clara,  CA. 
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Inflation 
Adjusted 
Loans 

When  Is  It  Worthwhile 
Paying  Out  Your  Loon 


M,  R.  Smith 
Alberta  Canada 

In  June,  my  house  mortgage  comes  up  for  renewal. 
The  interest  rate  on  my  mortgage  is  going  to  jump 
from  10.75%  to  16%.  My  monthly  payments  are 
going  to  go  from  $463  principal  plus  interest  to 
around  $680.  Since  this  is  one  great  jump  already, 
I  wondered  if  it  would  be  worthwhile  increasing  it 
another  $50  a  month  in  order  to  pay  the  loan  off 
earlier? 

The  purpose  of  this  program  is  to  find  out  the 
best  way  to  pay  off  a  loan,  taking  into  account 
inflation,  which  affects  both  your  salary  and  the 
value  of  the  dollar  used  to  pay  back  your  loan.  It 
has  been  written  in  a  general,  machine  independent 
form.  The  only  change  needed  is  in  line  13010. 
Forms  of  this  line  for  the  Apple,  PET  and  TRS-80 
are  given.  The  input  has  been  designed  to  be 
quasi-foolproof  and  will  accept  a  carriage  return  to 
indicate  no  change  in  value.  The  program  investi- 
gates the  interaction  of  changes  in  your  salary,  the 
dollar  you  use  and  the  monthly  payments. 

Many  people  realize  that  paying  out  a  loan 
early  can  result  in  a  big  saving  in  the  amount  of 
money  you  have  to  pay  to  the  bank.  Even  a  small 
amount  of  increased  payment  can  make  a  very 
large  saving  appear.  If,  for  example,  you  have  a 
$50,000  loan  at  16%  interest,  being  paid  back  at 
$680/month.  Over  the  length  of  the  loan  you  will 
have  to  pay  the  bank  $201,960.  Paying  back  at 
$710/month,  a  mere  $30  increase,  results  in  a 
saving  of  more  than  $5 1 ,000.  The  table  below 
shows  the  savings  that  occur  for  a  number  of 
monthly  payments. 

Payment       Total  Saving        Loan 


Per  Month    Paid  Out 


Paid  In 


$680 

$201,960 

- 

25yrs 

$710 

$150,520 

$51,440 

17.7  yrs 

$740 

$129,500 

$72,460 

14.6yrs 

$770 

$117,040 

$84,920 

1 2.6  yrs 

$800 

$108,800 

$93,160 

U.2yrs 

you  are  paying  with  really  deflated  dollars.  Is  it 
worthwhile  to  pay  out  your  loan  early  when  your 
early  payments  are  made  in  non-inflated  dollars?  I 
have  always  presumed  that  there  was  some  opti- 
mum monthly  payment.  Pay  back  too  much,  too  ear- 
ly, then  you  put  a  strain  on  your  budgi^l  and  waste 
money  by  paying  in  non-inflated  money.  Pay  back 
too  little  then  you  waste  money  by  paying  for  too 
long.  What  is  this  optimum  payment? 

In  addition,  suppose  you  find  that  paying  out 
early  is  a  good  itlea,  wiiat  is  the  best  amount  to  pay  a 

...  the  best  way  to  pay 

off  a  loan,  taking  into 

account  infiation ... 


month?  Now  the  answer  to  this  question  will  depend 
on  what  you  can  afford  to  pay.  If  you  pa\  out  a  large 
amount  each  month  then  you  will  havt;  little  left  to 
pay  for  other  luxuries  like  food.  It  is  ihcrefore  im- 
portant to  determine  the  impact  of  the  payments  on 
your  monthly  take-home  pay. 

As  an  example,  suppose  that  a  loan  for  $50,000 
at  an  interest  rate  of  16%i  per  year  has  been  taken 
out.  The  net  (after  tax)  income  is  $3,000  per  month 
and  expected  to  increase  at  a  yearly  rale  of  12%  to 
counteract  inflation.  The  following  table  indicates 
what  would  happen  to  both  the  total  cost  of  the  pay- 
ment and  the  inflation-adjusted  payment.  The  per- 
centage of  the  salary  that  goes  into  the  loan  is  also  in- 
dicated. The  percentage  over  the  length  of  the  loan 
and  the  percentage  in  the  first  year  are  both  shown. 
This  information  is  graphed  in  Figure  I. 

Monthly    Total  Inflation  Adjusted      %  OrincomeUsed 

Payment    Payment  Payment 


10% 

15% 

Average 

First  Year 

$680 

$201,960 

$81,268 

$60,588 

8.11% 

22.6% 

$710 

$150,520 

$76,301 

$59,777 

10.8% 

23.6% 

$740 

$129,500 

$73,321 

$59,190 

12.7% 

24.6% 

$770 

$117,040 

$71,217 

$58,750 

14.4%. 

25.6% 

$800 

$108,800 

$69,709 

$58,467 

15.8% 

26.6% 

The  purpose  of  this  program  is  to  investigate 
whether  or  not  these  enormous  savings  are  real.  Af- 
ter all,  inflation  means  that  10  years  down  the  line 


It  can  be  seen  from  the  graph  that  the  line 
indicating  total  amount  repaid  drops  very  rapidly 
as  the  monthly  payment  increases.  However,  the 
lines  for  the  inflation-adjusted  total  repayments 
are  very  flat,  especially  for  the  15%  inflation  rate. 
The  10%  inflation  rate  shows  a  large  drop  for  the 
first  increase  in  montlily  payment,  but  il  loo  is 
fairly  flat.  However,  the  average  percentage  of 
your  salary  s]>ent  on  the  loan  rapidly  int  rcascs  as 
your  monihly  payments  increase  (column  5).  This 
is  because  when  you  pay  off  very  quickly,  you  are 
paying  in  non-inflated  dollars  and  your  salary  is  low- 
er. 

From  these  figures,  it  seems  that  it  makes 
sense  to  pay  a  little  extra  a  month.  Paying  a  great 
deal  extra  only  puts  a  strain  on  your  budget  with 
little  overall  saving. 
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JINSAM'' Opens  The  Desk  Top 

Computer  Doors  To 

Easy  Application  Data  Management 


"Your  data  is  in  good 
hands  with  the  data 
manager  from  Jini 
Micro-Systems,  Inc. 
JINSAM  is  a  fast  and 
extremely  flexible  data 
manager." 

Robert  Baker 
Kilobaud  Microcomputing 

"So  far,  JINSAM  appears 
to  do  everything  my 
Hewlett-Packard  data 

JINI 


base  does.  My  HP  system 
cost  $6000  and  JINSAM 
is  easier  to  use." 

Ed  Presnal 
Marketing  Manager 
Phoenix  Distributing 


"We've  printed  over 
30.000  labels  with 
JINSAM.  We  no  longer 
have  an  outside  contract. 
My  principal  is  so 
pleased  that  he's  given 

MICRO  SYSTEMS,  INC. 


us  three  more  PET's  and 
the  Mother's  and 
Father's  Club  (PTA)  has 
donated  a  new  printer 
with  the  money  we've 
saved.  We're  now  also 
using  JINSAM  for 
fundraising  and  accurate 
records  for  recruitment 
target  areas." 

George  Morstatt 

Mt.  St.  Michael's  H.S. 

New  York  City 


Box  274-C8,  Riverdale,  NY  10463,  Telephone  (212J  796-6200 

Commodore  Approved  Software  Open  12:00  Noon-4:00  P.M. 


Approved  for  use  with  WordPro'"  3,3 +  . 4.4  + 
WofdPro  Is  a  ifademark  of  Professional  Software.  Inc. 


SWARiWi-lOO 


JUST  PLUG  IT  IN 

•  No  soldering  •  No  messy  wires 

SOFTWARE 
SELECTABLE 

1 .  Software  select  one  of  two 
operating  systems. 
(BASIC  2.0 /BASIC  4.0) 

2.  Software  select  utility  ROMs 
at  conflicting  addresses. 


$125 


00 


(U.S.) 


($150.00  Canadian) 

Add  $3.00  stiipping  to  all 

points  outside  Canada. 

Master  Charge  and 
VISA  accepted. 


BATTERIES 
inCLUDED 


Qc  ceammodore 


SQC31  Series 


Village  by  the  Grange 
71  McCaul  Street 
Toronto,  Ontario 
Canada  M5T  2X1 
(416)596-1405 
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WHY  BUY  FROM  THE  BEST? 

Service. ..  Support... 


Software . 


MULTI-CLUSTER 

For  Commodore  Systems,  allows  3 
CPUs  (Expandable  lo  81  to  access  a 
Single  Commodore  Disk 

MULTI-CLUSTER  (3 CPUsI S  795 

Each  Additional  CPU  lup  to  8)  . . .  S  199 


commodore 

16K  B  (16K  RAM-40  Column)  -  Lim.  Oty  $  995 

32K  B  (32K  flAM-40  CIm,)  -  Lim.  Oty S1295 

4016  (16K  RAM  4.0  Baslc-40  Clm.)  s  995 

4032  (32K  RAM  4.0  Basic-40  Ctm.l   $1295 

8032  (32K  RAM  4.0  Basic-80  Clm.) $1495 

8050  Dual  Disk  (1  Meg  Storage)  S1795 

4040  Dual  Disk  (343K  Storage) S1295 

8010  IEEE  Modem " |  28O 

C2N  Cassette  Drive  j    95 

CBM  -  IEEE  Interface  Cable  '.'.'.'.'.'.'.'.'.'.'.[ " $    40 

IEEE  -  IEEE  Interface  Cable '.'.'.'.'.'.'.'.'...$    50 

VIC  20  Home/Personal  Computer '.'.  $  295 

ALTOS 

ACS  8000-2  64K  1M   $4500 

ACS  8000-15  64K  1M  j  5990 

ACS  8000-6  208K  14.5M  S10490 

ACS  8000-7  208K  29.QM $11690 

ACS  8000-10  208K  10M $  8500 

ACS  8000-10/MTU $10990 


EPSON  PRINTERS 

MX-SO  PRINTER $645 

MX-80  FT S  745 

MX-100  S  945 

MX-70  $  459 

INTERFACE  CARDS 

8141  (RS-232) S    75 

8150  (2K  Bufferefl  RS-232) S  150 

8161  (IEEE  488)   S    55 

8131  (Apple  Card)  S    85 

8230  (Apple  Card)  S    25 

8220  (TRS.80  Cable) $    35 

DIABLO  630  PRINTER 

DIABLO  530  -  Serial  -  RS-232 S2710 

Tractof  Option  $  250 


NEC  SPINWRITER  PRINTERS 

5530  (Parallel) $3055 

5510  (Serial)   $3055 

5520  (KSR-Serial) $3415 

Tractor  Optioiv $  225 


APPLE 

I6K  APPLE  fl*   S1330 

32K  APPLE  II*   S1430 

48K  APPLE  II*   S1530 

APPLE  DISK  w/3-3  DOS  .S  650 

APPLE  DRIVE  Only S  490 

APPLE  111  128K- In  Stock! 
w/Monitor  * 
Info  Analyslpak S4740 


AMDEK  MONITORS      INTERTEC  COMPUTERS 


Video  100  12"  B*W $  179 

Video  300  12"  Green $  249 

Color  I  13"  Low  Res $  449 

Color  II  13"  High  Res $999 


64K  Superbrain 

(360  Disk  Storage),  CP/M™ . . .  S3495 
64KQD  Superbrain 

(700K  Disk  Storage),  CP/M". .  $3995 


*CP/M  is  a  registered  trademark  of  Digital  Research 


ATARI  COMPUTERS 

Atari  400  (16K  HAM)   $  399 

Atari  800  (32K  RAM)  -  good  thru  8/31  $1080 

Atari  410  RECORDER  $    89,95 

Atari  810  DISK  DRIVE $  599  95 

NEECO  carries  all  available  ATARI  Software  and  Peripherals. 


PROFESSIONAL 
SOFTWARE 

VKordPro  1  8K S    29.95 

WordPro  3  (40  Clm.)16K  .    ..S  199.95 

WordPro  3+ $  295 

WordPro  4  (80  Clm.)  32K.    . .  S  375 
WordPro  4* ■  -  $  450 


JUST  A  SAMPLE  OF  THE  MANY  PRODUCTS  WE  CARRY.     CALL  US  FOR  OUR  NEW  60-PA6E  CATALOG. 

WE  WILL  MATCH  ANY  ADVERTISED  PRICE  ON  PRODUCTS  LISTED  UNDER  SIMILAR  "IN  STOCK"  CONDITIONS. 


NEECO 

679  HIGHLAND  AVE. 
NEEDHAM.  MA  02194 


(617)  449-1760 


Telex:  951021 


MON-FRI  9:00  •  5:00 
MagterCharge  end  VISA  Accepted 
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NEECO 


INTRODUCES  THE 
CBM  VIC-20 
COMPUTER! 


fr 


Commodore 
breaks  the 
computer 
price  barrier 


$  299.95 
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CBM  VIC-20 
PERSONAL 
COMPUTER 


VIC-20  SPECIFICATIONS 

•  8  colors  -  built  In 

•  sound  generation  -  built  in 

•  programmable  function  keys 

•  5K  memory  expandable  to  32K 

•  standard  PETBASIC  in  ROM 

•  full-size  typewriter  keyboard 

•  graphics  character  set 

•  plug-in  program/memory  cartridges 

•  low-priced  peripherals 

•  joystick/paddles/lightpen 

•  self-teaching  materials 

•  WORKS  WITH  ANY  HOME  TELEVISION 


$74.95 


C2N 

TAPE  CASSETTE 
DRIVE 


CALL  NEECO  TODAY  FOR  ADDITIONAL  VIC-20  IHFORMATION 

As  the  CBM  VIC-20  is  a  *new'  producl,  prices  and  specifications  are  subject  to  change  w/o  notice 


NEECO  WILL  MATCH  ANY  ADVERTISED  PRICE  ON  CBM  EQUIPMENT 
FROM  ANY  OTHER  COMPANY  WITH  PRODUCT  IN  STOCK. 


NEECO 

(617)  449-1760 

679  HIGHLAND  AVE.                 Telex:  951021 
NEEDHAM.  MA  02194  


MON-FRI  9:00  -  5:00 
MasterCard  and  VISA  Accepted 
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$200,000 


$  [50,000    — 


REPAYMENT 


$100,000 


$50,000 


$680 


\ 


\ 


\ 


\ 


\ 


\ 


\ 


$50,000    LOAN    AT 
16%  INEREST  RATE 


TOTAL    REmYMENT 


INFLATION    ADJUSTED    TOTAL   PAYMENT 


$710 


$740  $770  $800 


PAYMENT    PER   MONTH 


Figure  1 
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$250,000 


$200,000 


$150,000 


RFPflYMFNT 


$100,000 


$50,000 


\ 


$840 


\ 


\ 


\ 


\ 


\ 


X 


N. 


V, 


$50,000    LOAN    AT 
20%  INTEREST  RATE 


TOTAL    REPAYMENT 


INFLATION   ADJUSTED   TOTAL    PAYMENT 


$880  $920  $960 

PAYMENT    PER   MONTH 


$1000 


Fig[ure  2 
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As  can  be  seen  Iroiii  figure  2,  the  siUiaiion 
changes  if'lhe  bank  intcicsi  rate  shifts  lo  20%. 

Monthly    Total  Inflation  Adjusted 
Payment   Payment  Payment 

107f  15% 

$  840        $246,120  $100,049    $74,727 

$  880        $156,640  $  87,888    $70,721 

$  920        131,560  $  82,423    $68,622 

$  960        $118,080  $   78,974    $67,200 

$1000        $109,000  $  76,443    $66,132 

This  time  there  is  a  big  saving  in  paying  off 
early  for  either  inflation  rate.  This  is  because  the 
inflation  rate  is  not  close  to  the  interest  rate  and  you 
are  losing  more  money  in  interest  payments  than  in 
inflation.  Note  that  again  the  lines  become  flat  for 
large  monthly  payments,  indicating  that  a  large 
increase  in  payments  are  still  not  really  worthwhile. 

This  program  seems  to  suggest  that  it  makes 
sense  to  pay  off  your  krans  a  little  earlier  provided 
the  inflation  rate  is  not  too  high.  It  also  indicates  that 
there  is  no  best  monthly  payment  where  your  losses 
are  minimized.  The  bank  always  wins.  I  hope  that  by 
adjusting  the  variables  you,  too,  can  make  sensible 
decisions  about  your  own  finances. 

Program  Design 

Lines  100-490.  The  various  variables  are  initialized. 

The  variables  used  are: 

ILOAN  -  Initial  loan  amount. 

OLOAN  -  Outstanding  loan  after  YR  years  and 

MM  months. 

TPAY  -  Total  amount  paid. 

APAY  -  Inflation  adjusted  amoimt  paid. 

RYR  -  Rate  of  loan  interest  as  %  for  the  year. 

COLI  -  Cost  of  hving  increase  as  %  for  the  year 

(equivalent  to  the  inflation  rate  approximately). 

SAL  -  Salary  %  increase  for  a  year. 

MPAY  -  Monthly  payment  on  the  loan. 

IMPACT  -  Impact  of  payments  on  remaining 

salary. 

To  allow  the  calculation  of  a  range  of  payments, 
the  following  variables  can  be  changed  over  a  range 
:-  RYR,  COLI,  SAL  and  MPAY.  For  example:  If  you 
want  to  find  the  effect  of  increasing  your  monthly 
payments  from  $600/month  to  $800/month  then 
the  program  can  set  MPAY(I)  =  600  and 
MPAY(2)  =  9()0.  The  program  automatically  calcu- 
lates the  changes  needed  to  step  the  monthly 
payments  from  $600  to  $800  in  five  intervals.  A 
typical  input  sequence  and  screen  output  are  shown 


Figure  3 
RUN 
3 

initial  loan  amount  t 
prese:nt  ualue  soooo 
ne:w  value  <cr> 

monthly  salary  * 
present  value  2000 
new  value  30  0  0  <cr> 


in  fig.  3. 

Lines  1000-1300.  The  values  of  the  variables  can  be 
changed  in  this  section.  The  old  value  can  be  ac- 
cepted by  simply  pressing  carriage  return.  If  a 
value  of  zero  (0)  is  input,  then  this  value  is  queried. 
However,  it  can  be  accepted. 

Lines  2000-2590.  The  actual  calculation  of  the  vari- 
ous totals  are  made  here. 

The  interest  for  the  new  month  is  calculated 
in  line  2310. 

The  monthly  payment  is  calculated  in  line 
2370.  It  is  adjusted  to  take  into  account  the  inflation 
since  the  start  of  the  loan  by  the  formula: 

Monthly  payment  in  1981  buying  power  = 
monthly  payment  x  actual  value  of  a  1981  dol- 
lar at  this  lime. 

Actual  value  of  a  dollar  =  100/(100-1-  inflation 
rate)  all  raised  to  the  power  of  (present  vear  - 

I98I). 

The  impact  value  of  the  monthly  payment  is 
calculated  in  line  2390.  It  is  calculated  as  the 
fraction  of  a  month's  salary. 

The  subroutines  10000,  IIOOO,  12000  and 
13000  lake  in  the  new  values  of  the  variables.  A 
simple  carriage  return  retains  the  old  value. 
Subroutine  10000  -  allows  the  input  of  ranges  of 
values. 

Subroutine  1 1000  -  allows  the  input  of  a  single 
value.  If  the  value  is  zero  then  this  is  queried. 
However,  it  can  be  accepted. 
Subroutine  12000  -  checks  for  a  yes/no  answer. 
Subroutine  13000  -  gets  the  actual  input  line. 
There  is  one  statement  that  needs  to  be  changed 
when  using  a  PET  or  TRS-80. 

For  a  PET: 

13010  GET  A$:  IF  A$  =  ""  THEN  13010 

For  a  TRS-80: 

13010  A$  =  1NKEY$:  1FA$  =  ""THEN  13010 

APPLE  And  PET  Users: 

For  a  copy  of  this  program  on  tape  in  APPLE- 
SOFT, send  me  a  money  order  for  $1.5.00.  PET 
users  can  use  the  APPLE  to  PET  tape  conversion 
program  listed  in  the  Sept./Oct.  1980  edition  of 
COMPUTE!  magazine. 

Acknowledgements 

I  would  like  to  thank  Mr.  John  Post  for  preparing  the  graphs. 


SALARY  YEARLY  INCREASE  % 
LOW  PRESENT  VALUE  12 
NEW  VALUE  <C;R> 
HIGH  PRESENT  VALUE  12 
NEW  VALUE  <CR> 

COST  OF  LIVING  INCREASE  % 
LOW  PRESENT  VALUE  12 
NEW  VALUE  <C;R> 
HIGH  PRESENT  VALUE  12 


July.  1981.  Issue  14 


COMPUTE! 


29 


MICRO  MINI  COMPUTER  WORLD 

74  Robinwood  Ave. 

Columbus,  Ohio  43213 

(614)  235-S813  or  235-6058 

PRESENTS 

BUSINESS  ENHANCEMENTS 

COMPUSERVICE  BUSINESS  SOFTWARE 

for 

COMMODORE  AND  APPLE  COMPUTER  SYSTEMS 


B.E.C.  #3000  Series 

General  Ledger 

Accounts  Receivable 

Payroll 

Invenlory 

Mail  Lisi 

Job  Cpst 

Accounts  Receivables 

with  Order  Enlry 
ROM  Control  Chip  required  wttli  CBM  Syslem 

B.E.C.  #4000  Series  NEW  far  8032/B1150 


(Apple  II  &  CBI^  2001/8032/2040) 
(Appie  II  &  CBI/  2D01/8032/2O4O) 
(Apple  II  &  CBIvt  2001/8032/2040) 
(Apple  II  &  CBM  2001/8032/2040) 
(Apple  II  S  CBM  2001/8032/2040) 
(Apple  II  &  CBM  2001/8032/2040) 
(CBM  2001/8032/2040) 


General  Ledger 


(CBM  8032/8050) 


Accounts  Receivables      (CBM  8032/8050) 


with  Order  Entry 
Accounts  Payable 
Payroll 
Inverttory 
Mail  List 
Job  Costing 


(CBM  8032/8050) 
(CBM  8032/8050) 
(CBM  8032/8O50( 
(CBM  8032/8050) 
(CBM  8032/8050) 


ROM  Control  Chip  required  witti  CBM  System 


$150.00 
St  50.00 
$150.00 
$150.00 
S150.00 
S150-D0 
S220.00 

$  70.00 


$175.00 
$220.00 

SI  75.00 
$175.00 
$150.00 
$175.00 
$150.00 
$  70.00 


Special  Otter,  buy  any  two  (2)  ot  the  above  packages  and  receive  a  10%  dis- 
count off  suggested  retail.  Offer  expires  1  July.  1981. 

Send  lor  documentation  pacloge  lor  $20,  apply  ttiis  amount  towards  your  first 
purchase  or  return  documentatton  In  re-saleable  condition  tor  complete  refund. 

CALL  or  WRITE  lor  MMCWI's  FREE  CATALOG  of  computer  products. 
B.E.C,  Soltware  is  Distributed  in  the  East  by  MICRO  MINI  COMPUTER 
WORLD  INC 

Dealer  Inquiries  Invited 


Introducing 
THE  DOUGLAS  POINT  OF  SALE  SYSTEM 

The  DOUGLAS  POINT  OF  SALE  SYSTEM  is  a  data  processing  system  operating 
on  the  Commodore  Business  Machines  8032  or  2001  (with  BASIC  4,0  ROM's 
installed),  and  the  8050  megaoyte  disk  computing  equipment.  The  standard 
business  keyboard  is  required  The  system  inlegraies  retail  sales  facilities  and 
acttvilies  with  the  merchantile  invenlory  lo  provide  a  complete  " point-ot-sale  " 
data  processing  system  lor  the  retail  trade  establishment. 
The  DOUGLAS  POINT  OF  SALE  SYSTEM  supports; 

•  Major  requirements  of  the  retail  sale  transaction; 

•  Normal  out-ol-invenlory  sales, 

•  Non- inventory  sales  such  as  installation  fees. 

•  Customer  returns, 

•  Down  payments  in  cash  or  in  used  equipment, 

•  Casn  and  credit  transactions, 

•  Provision  tor  tax  exempt  customers. 

•  Control  of  loaned  inventory  items 

•  Sales  tax  computations  for  sales  and  returns, 

•  Printed  receipts  with  company  name  and  receipt  number, 

•  Capability  to  add  personalized  notes  on  each  receipt, 

•  Integration  of  sales  activity  with  inventory: 

•  Automatic  adjustment  lo  inventory  at  time  of  sate. 

•  Customer  returns  posted  back  lo  inventory  at  time  ol  sale, 

•  Stock  replenishment  determined  at  time  of  sale, 

•  Complete  sales  history  captured  during  each  sale, 

•  Automated  processing  ol; 

•  Mail  lists  of  customer  and  distributor  addresses, 

•  Major  ilem  customer  inventory, 

•  Trade-in  acceptance  dala  lor  used  inventory  report, 

•  The  invenlory  receiving  process  and  associated  reports, 

•  Service  and  maintenance  contracts, 

•  Daily  sales  activity  report 

•  File  purge  and  system  backup. 

•  Password  security  lor  unattended  computer. 

•  Pricing  and  addressing  labels. 

DISTRIBUTED  BY: 


SUGGESTED  RETAIL  S750.00 

CALL  OR  SEND  FOR 
MMCWI  CATALOG 

DEALER  INQUIRIES  INVITED 


74  ROBINWOOD  AVE.    COLUHaUS.OMI0  4M13 
(er4)  23S-M13  (E14)  23S-«0S( 


MICRO  MINI  COMPUTER  WORLD 

74  Robinwood  Ave.    Columbus,  Ohio  43213 

(614)  235-5813  or  235-6058 

PRESENTS 

THE  INTEGRATED  COMPUTER  TECHNOLOGIES 


Pri<iress-44  Internal  Motherboard; 

The  ICT  P-44  IS  a  44  pin  internal  motherboard  thai  lacililales  expansion  of  your 
PET/CBM  within  ttie  PET  enclosure  The  Prioress-44  is  fully  shielded  on  its  under- 
side by  a  massive  ground  plane  Ttie  connectors  utilize  any  standard  44  pm  edge 
card  (many  slyies  are  available  from  Radio  Shack),  The  following  signals  comprise 
the  P-44  bus; 

■    -f9v.-9v,-H6v,GND,IBQ,RES,NMI,RDY,B02. 

•  BA0-BA15.B00-BD7,BR/W,BW/R.SEL8,SEL9.SELA,SELB 

•  DIAGNOSTIC  SENSE, SVNC  and  3  User  delinable 
Ttie  Prioress-44  is  currently  available  lor  the 
new  2000  and  4000  series,  and  is  under 
development  tor  the  8000  series, 

All  ICT  cards  utilize  ttie  Prioress-44  bus, 

Price:  PrioresE-44  with  one  connector  $79  00 

Priores5-44  wilfi  six  connectors  .  95,00 

Each  additional  connector  ,4  00 
(specify  when  ordering] 

The  ICT  PrDgrammable  Character  Generator; 
The  ICT  Programmable  Character  Generator  is 
a  2K  RAM  replacement  for  Ihe  PET/CBM 
Character  Generalor  ROM,  The  device  allows 
the  user  lo  reprogram  any  or  ail  of  Itie  256 
standard  PET  screen  characters.  The  PCG  also 
tunclions  as  2K  bytes  of  RAM  in  the 
S9000-SBFFF  address  range, 

Usesol  the  ICT  PCG: 

a)  Foreign  character  sets, 

b)  Math,  Engineering  and  special  notations, 

c)  Music  notation. 

d)  Flow  control  and  modeling. 


h)320H*200V  SIT  GRAPHICS, 
i)    .,many,  many  more, 


e)  Schematic  and  logic  symbols, 
I)  CriaraclBr  oriented  game  symbols, 
g)  Architectural  Drawings, 

The  PCG  has  an  empty  socket  lor  the  original  PET/CBM  ROM,  With  the  provided 
external  switch  RAM  or  ROM  may  be  selected, 

ICT  provides  over  !2aK  of  soflv/ars  and  dala,  allowing  Ihe  user  lo  immediately 


utilize  Ihe  graphics  system  with  extreme  ease.  Software  is  provided  on  2040  format 
diskette  and  includes: 

a)  7  complete  2K  character  sets  (Russian.  Katakana-^)- 
h)  Predefined  graphics  (including  Ihe  Real-time  rotating  cube), 
c)  Development  Tools  including; 
Charentry  -  used  to  program  characters  in  an  8x8  matnx, 
Draw  -  a  program  that  allows  drawing  in  a  320x200  area. 
Plot  ■  two  versions,  x,y  plotting  in  Ihe  320x200  matrix,  A  fast  assembler 

version  and  a  readable  BASIC  version. 
Screen  Dump  -  an  assembler  program  lo  dump  the  EXACT  screen  contents 
lo  a  Commodore  2022  printer. 

Price;  PCG  with  2040  diskette  and  manual  $240,00 

Manual  alone , 7,50 

Tlie  ICT  HexROM: 

A  Six  socket  programmable  ROM  board.  Any  three  of  the  sockets  may  tje  pro- 
grammed to  become  ROMs  ai  $9000,  S9B00,  SAOOO,  SABOO,  SBOOO  and/or  SB800, 
A  simple  BASIC  POKE  equates  any  socket  lo  any  of  me  above  addresses. 

Price:  HexROM  and  manual  Si  10,00 

DumROM  (6  sockets  at  fixed  addresses)  ,69,00 

The  ICT  EPROMer: 

The  EPROMer  will  READ/PROGRAM/VERIFY  the  following  EPROMs; 

2758,  2716,  2732  (24  pin  EPROMs)  and 

2764,  27128  (28  pin  EPROMs) 
To  a  maximum  ol  36  pin  I/O  (5V), 

The  software  (wrillen  in  assembler)  will  support  the  above  EPROM  types  and  also 
allow  Ihe  user  lo  define  any  new  EPROM  conligurations  (5V  Vcc,  25V  Vpp), 

Price,  EPROMer,  software  and  manual  , ,  $180.00 

ICT  Products  distributed  by  Micro  Mini  Computer  world  Inc 

*•*  Special  introductory  offer  *'* 

10%  off  alt  suggested  retail  prices 

(oiler  expires  July  1.  1981)  DEALER  INQUIRIES  INVITED 
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NEIW  i^ALUE  <CR> 

MONTHLY  PAYMENT  RATE  * 
LOW  PRESENT  VALUE  650 
NEW  VALUE  <(;R> 
HIGH  PRESENT  VALUE  80  0 
NEW  VALUE  <CR> 

LOAN  INTEREST  RATE  YEARLY  % 

LOW  PRESENT  VALUE  16 

NEW  VALUE  <C:R> 

HIGH  PRESENT  VALUE  16 

NEW  VALUE  <CR> 

PRINT  OUT  END-OF-YEAR  TOTALS?  Y/N  N 
<CR> 

LOAN  $500  0  0   INTEREST  RATE  16% 
INFLATION  12%   SALARY  *30  0  0/MONTH 
SALARY  INCREASE  12% 


CAN'T  BE  DONE  @  $650/MONTH 

AFTER  24  YRS  9  i1  @  $680  /M(]NTH 
TOTAL  $201960    ADJUSTED  $71545 
IMPACT  FACTOR  8 

AFTER  17  YRS  8  M  Q?  $710  /MONTH 
TOTAL  $150520    ADJUSTED  $68765 
IMPACT  FACTOR  ID 

AFTER  14  YRS  7  M  0  $740  /MONTH 
TOTAL  $129500    ADJUSTED  $66981 
IMPACT  FACTOR  12 

AFTER  12  YRS  8  M  (?  $770  /MONTH 
TOTAL  $117040    ADJUSTED  $65685 
IMPACT  FACTOR  14 

AFTER  11  YRS  4  M  @  $80  0  /MONTH 
TOTAL  $10880  0    ADJUSTED  $64762 
IMPACT  FACTOR  15 


3  LIST 


10 
11 
12 

13 

14 

15 

16 

17 

18 

100 

110 

120 

13  0 

140 

150 

160 

170 

180 

190 

ZOO 

210 

22  0 

23  0 

24  0 
250 
260 
270 
280 
290 
30  0 
310 
320 
330 
340 
350 


REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 

REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 

ILOAN 
REM 
REM 
REM 
REM 
REM 

TRAY 
REM 
REM 
REM 
REM 
REM 

RYRd 
REM 
REM 
REM 
REM 
REM 

COLK 


CALCULATION  OF  WHEN  TO  PAY  OUT  YOUR  LOAN 

M, R.SMITH   MARCH  1981 

30  4,  B6TH  AVENUE  SE, 
CALGARY,  ALBERTA, 
CANADA  T2H  1N7 

I N I T I A  L.  I Z  E;:  V  a  R  I  a  1:1  L  I::  S 

ILOAN  ■■=■■    INITIAL  LOAN 
OLOAN  ^^^^  OUTSTANDING  LOAN 


-  5000 G: OLOAN 


ILOAN 


TPAY  ■•=  TOTAL  PAYMENTS 

APAY  =  INFLATION  ADJUSTED  TOTAL  PAYMENTS 
IMPACT  =  SALARY  IMPACT  FACTOR 

-  OJAPAY  :=  0  J  IMPACT  =  0 

RYR(l)  ==  %  RATE  YEARLY  INTEREST  (LOW) 
RYR(2)  ■■--■■    7,    RATE  YEARLY  INTEREST  (HIGH) 


RYR(3) 


:TEP 


'  -•=  16tRYR(2>  =  16 

COLKl)    -    %    COST    OF    LIVING    INCREASE    YEARLY     (LOW) 
COLK  2)    ■■■■■■■■    %    COST    OF    LIVING    INCREASE    YEARLY    (HIGH) 
COLK  3)     ---^    STEP 


1)    =    12;  COLK  2) 
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ottc 


3tlC 


Stic 


31  *C 


3<»C 


31  >C 


rsttc: 


3<lc: 


NEW  COLLEGE  BOARDS 


forTRS-80 


81/82     PET,APPLE^ 


The  best  way  to  sharpen  your  skills  for  the  College  Boards  is  to  work  on  actual  examinations.  Each  of 
these  program  sets  confronts  the  user  with  a  virtually  limitless  series  of  questions  and  answers.  Each 
program  is  based  on  past  exams  and  presents  material  of  the  same  level  of  difficulty  and  in  the  same 
form  used  in  the  College  Board  examination.  Scoring  is  provided  in  accordance  with  the  formula 
used  by  College  Boards. 

SAT,  PSAT,  N.M.S.Q.T.,  set  includes  20  programs  covering  Vocabulary,  Word  Relationships,  Reading 
Comprehension,  Sentence  Completion,  and  Mathematics.  Price  $149.95 

EDUCATOR  EDITION  -  SAT,  PSAT  Includes  all  of  the  above  programs  plus  detailed  solutions  and 
explanations  for  each  problem  plus  drill  exercises.  SAT  set  includes  26  programs  $229.95 

GRADUATE  RECORD  EXAMINATION  set  Includes  23  programs  covering  Vocabulary,  Word  Relation- 
ships, Reading  Comprehension,  Sentence  Completion,  Mathematics,  Logical  Diagrams,  Analytical 
Reasoning.  $199.95 

EDUCATOR  EDITION  -  Graduate  Record  Exam  Set  includes  33  programs.  $289.95 

Owners  of  our  initial  College  Board  series  can  upgrade  their  package  to  the  College  Board  81-82  specs, 
including  the  all  new  reading  comprehension,  sentence  completion  plus  expanded  vocabulary  and 
mathematics  sections  for  $69.95. 


X 


ALLTIME  SUPER  STAR  BASEBALL 
&  SUPER  STAR  BASEBALL 


AIL  TIME 
SUPER  STAR  BASEBALL 
Sample  Lineup 


T.  Williams 
}.  fuxx 

H.  CrfenberB 
R.  Horn^by 
H.  Wilson 
B.  Terry 
M.  Mantle 
H  A^ron 
\V,  |ohns(in-|> 


SUPERSTAR  BASEBALL 
Sample  Lineup 


D-  Pdtket 
W.  SMrgell 
W.  May* 
P.  Roie 
O,  Cepeda 
C.  Yjzstremski 
W.  iMcCovey 
R.  Ijckson 
G   flrell 
W  C.uidryP 


I- Rite 
H   Aaron 
L   Brock 
R-  Carew 
H.  Killebrew 
R.  Allen 
R.  Lellore 
RZisk 
a   Madlock 
T.  Se,ivef-p 


SWORD  OF  ZEDEK 

Fight  to  overthrow  Ra,  The  Master  of  Evil.  In  this  incredible 
adventure  game,  you  must  confront  a  host  of  creatures,  nat- 
ural and  supernatural.  To  liberate  the  Kingdom,  alliances 
must  be  forged  and  treasures  sought.  Treachery,  deceit  and 
I  witchcraft  must  be  faced  in  your  struggles  as  you  encounter 
wolves,  dwarves,  elves,  dragons,  bears,  owls,  ores,  giant  bats, 
trolls,  etc.  Each  of  the  twelve  treasures  will  enhance  your 
power,  by  making  you  invisible,  invulnerable,  more  elo- 
quent, more  skillful  in  combat,  etc.,  etc.,  as  you  explore  the 
realms  of  geography,  both  on  the  surface  and  underground. 

g  Dungeons,  temples,  castles,  mountains,  etc.,  are  all  a  part  of 
the  fantastic  world  of  Ra.  Each  game  is  unique  in  this  spec- 
.acularandcompl.worldoff.tasy. 


i ////./ 


TIME  TRAVELER 

,^      The  best  of  the  adventure  games.    Confronts  player  with 
^   '^^complex  decision  situations  and  the  demand  for  real  time  ac- 
^L  -^  fion.   Using  the  Time  Machine,  players  must  face  a  challeng- 
v^K  -^    ing  series  of  environments  that  include;  The  Athens  of  Per- 
icles, Imperial  Rome,  Nebuchadnezzar's  Babylon,  Ikhnaton's 
Egypt,  Jerusalem  at  the  time  of  the  crucifixion.  The  Crusades, 
Machiavelli's  Italy,  the  French  Revolution,  the  American  Rev- 
olution, and  the  English  Civil  War.    Deal  with  Hitler's  Third 
Reich,  Vikings,  etc.    At  the  start  of  each  game  players  may 
choose  a  level  of  difficulty.  .  .the  more  difficult,  the  greater 
the  time  pressure.  To  succeed  you  must  build  alliances  and 
struggle  with  the  ruling  powers.  Each  game  is  unique. 

S24.95 


Performance  is  based  on  the  interaction  of 
actual  batting  and  pitching  data.  Game  can 
be  played  by  one  or  two  players  with  the 
computer  acting  as  a  second  player  when  de- 
sired. Players  select  rosters  and  lineups  and 
exercise  strategic  choices  including  hit  and 
run,  base  stealing,  pinch  hitting,  intentional 
walk,  etc.  Highly  realistic,  there  are  two  ver- 
sions, ALL  TIME  SUPER  STAR  BASEBALL,  and 
SUPER  STAR  SASEBALl.  featuring  players  of 
the  present  decade.  Each  includes  about  50 
players  allowing  nearly  an  infinite  number  of 
roster  and  lineup  possibilities. 

•Both  Games $24.95 


ISAAC  NEWTON 

Perhaps  the  most  fascinating  and  valu- 
able educational  game  ever  (Revised  -  ISAAC 
NEVVTON  challenges  the  players  (1-4)  to 
assemble  evidence  and  discern  the  under- 
lying "Laws  of  Nature"  that  have  produced 
this  evidence.  ISAAC  NEWTON  is  an  induc- 
tive game  that  allows  players  to  intervene 
actively  by  proposing  experiments  to  deter- 
mine if  new  data  conform  to  the  "Laws  of 
Nature"  in  question.  Players  may  set  (he 
level  of  difficulty  from  simple  to  fiendishly 
complex. 

In  a  classroom  setting  the  instructor  may 
elect  to  choose  "Laws  of  Nature"  in  accor- 
dance with  the  complete  instruction  man- 
ual provided. 

For  insight  into  some  of  the  basic  principles 
underlying  ISAAC  NEWTON  see  Code/, 
Escher,  Bach  by  Douglas  R.  Hofsladter, 
Chapter  XIX  and  Martin  Gardner's  "Mathe- 
matical Games"  column  in  Scientific  Amer- 
ican, October,  1 977  and  June,  1 959. 

$24.95 


! 


l 


♦ALL  PROGRAMS  AVAILABLE  FOR 

TRS-80,  APPLE  II  &  PET 
•  Programs  for  APPLE  or  TRS-80  are  on 
D  disk  or  D  cassette,  p/ease  specify. 

All  pmgrami  require  I6K»TR5  BOpraiirami  requre  tfVEL  H  BASIC  •APPlf  pragrjms  require  Applesoft  BASIC 


K^ell  Software 

Send  check  or  inoney  order  to         \ 


21  Milbrook  Drive,  Stony  Brook,  NY  1 1 790 

(516)751-5139 
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360 

REH 

, 

370 

REM 

MPAY(l)  -  MONTHLY  PAYMENT  (LON) 

380 

REM 

MPAY(2)  ^-    MONTHLY  PAYMENT  (HIGH) 

390 

REM 

MPAY(3)  -  STEP 

■ 

^00 

REM 

^10 

MPAY(l)  -  650tMPAY(2)  =^  80  0 

^2  0 

REM 

^3  0 

REM 

SAL(O)  ==  MONTHLY  SALARY 

^'^Q 

REM 

SAL(l)  -  %  RATE  OF  SALARY  INCREASE  PER  YEAR  (LOW) 

'ISO 

REM 

SAL  (2)  -  ■/.    RATE  OF  SALARY  INCREASE  PER  YEAR  (HIGH) 

^6Q 

REM 

SAL (3)  -  STEP 

^70 

REM 

^80 

SAL.(0 

)  -  2000;SAL(1)  -  12;SAL(2)  ^-  12 

^90 

REM 

1 

50  0 

REM 

SUBROUTINES 

510 

REM 

520 

REM 

DUMMY  AND  DUMMYO  ARE  VARIABLES  USED  IN  SUBROUTINES 

530 

REM 

CARRIAGE  RETURN  ALONE  RETAINS  OLD  ANSWER 

5^0 

REM 

55  0 

REM 

GOSUB  10  000  -  GET  A  RANGE  OF  VARIABLES 

56  0 

REM 

GOSUB  1100  0  -  GET  A  VARIABLE 

570 

REM 

GOSUB  12000  -  GET  A  YES/NO  ANSWER 

58  0 

REM 

GOSUB  130  0  0  -  GET  THE  INPUT  LINE 

990 

REM 

GET  THE  NEW  VALUES 

992 

REM 

J.  0  0  0 

PRINT  J  PRINT  i    PRINT  "INITIAL  LOAN  AMOUNT  *" 

1010 

DUMMY  =  ILOAN:  GOSUB  UOOOJILOAN  -  DUMMY 

1020 

REM 

1030 

PRINT  :  PRINT  ■■MONTHLY  SALARY  $" 

10^0 

DUMMY  =  SALCO);  G08UP  1100  0  JSAL(O)  r.    DUMMY 

1050 

PRINT  :  PRINT  "SALARY  YEARLY  INCREASE  %" 

1060 

DUMMY(l)  =  SAL(l)tDUMMY(2)  =  SAL(2):  GQSUE;:  10000 

1070 

SALC 

)  -  DUMMY(1):SAL(2)  ==  DUMMY  (  2  )  J  SAL  (  3  )  =  DUMMYO) 

1080 

REM 

1090 

PRINT  "COST  OF  Llk^ING  INCREASE  7." 

110  0 

DUMMYd)  -  COLKl)  JDUMMY(2)  ^^  C0LI(2);  GGSUE?  100  0  0 

1110 

COLI(l)  ==  DUMMYd)  ;C0LI(2>  =  DUMMY  <  2  )  t  C0LI(3  )  -  DUMMY  (3) 

1120 

REM 

1130 

PRINT  "M(DNTHLY  PAYMENT  RATE  $" 

11-^0 

DUMMY  (1)  -  MPAY(l)  ;DUMMY(2)  =  MPAY(2):  GGSUE;:  100  0  0 

115  0 

MPAY(l)  ^==  DUMMY(l)  :MPAY(2)  =  DUMMY  (  2  )  I  MPAY  (  3)  =  DUMMYO) 

1160 

REM 

1170 

PRINT  "LOAN  INTEREST  RATE  YEARLY  %" 

■ 

1180 

DUMMY(l)  =  RYRCl)  :DUMMY<2)  =  RYR(2):  GOSUEi!  10000 

119  0 

RYRCl)  -  DUMMY(l)  ;RYR(2)  =  DUMMY  (  2  )  :  RYR  (  3  )  ==  DUMMY  (3) 

120  0 

REM 

.  I 

1210 

PRINT  "PRINT  GUT  END--GF-YEAR  TOTALS?  Y/N  "J 

1220 

GGSUB  120  00:EGYt  -  YN$ 

1990 

REM 

1991 

REM 

ACTUAL  CALCULATIONS                         [ 

1992 

REM 

2000 

REM 

LOOP  ON  INTEREST  RATES  -  ADJUST  TO  MONTH  AND  FRACTION 

2010 

FOR 

RYR  =  RYR(l)  /  1200  TO  RYR(2)  /  1200  STEP  RYR(3)  /  1200 

2020 

REM 

2030 

REM 

COST  OF  LIVING  LOOP  -  ADJUST  TO  FRACTION 

20^0 

FOR 

COLI  =  COLKl)  /  100  TO  C0LI(2)  /  100  STEP  C0LI(3)  /  100 

2050 

REM 

AV  IS  ACTUAL  VALUE  OF  A  STARTING  DOLLAR  AT  END  OF  YEAR 

2060 

Ay  == 

1  /  (1  +  COLD 

2070 

REM 
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ATARI®  ,  PET®    or 
APPLE®    OWNERS 

BUSINESS  OPPORTUNITY 

DEALER  REPRESENTATIVES  WANTED 

PART  OR  FULL  TIME 
NO  ROYALTIES,  NO  FRANCHISE  FEE 

Exceptionally  lucrative  ground-floor  op- 
portunity to  participate  in  the  explosive 
Micro-Computer  Market.  The  Computer 
Bus  offers  Community  minded  ATARI® 
or  PET®  owners  the  chance  to  develop 
their  own  successful  business  within  a 
relatively  short  period  of  time  with  this 
innovative  Microcomputer  concept.  The 
prognosis  for  success  has  never  been 
better. 

If  you  are  accepted  as  a  Computer  Bus 
"Learning  Center"  Dealer  you  will  operate 
your  own  sales  and  rental  business  from 
your  home  or  office,  featuring  a  product 
line  of  uncompromising  quality  and  out- 
standing company  support. 

Investment  required  $3,000,  secured  by 
extensive  computer  software  and  hard- 
ware. Protected  territory,  leads,  national 
and  regional  advertising,  technical 
support  and  full  back-up  service. 

For  additional  information  call  toll  free 
1-800-321-3670 

Ohio  Residents  Call  Collect 
1-216-255-1617 


the  COMPUTER  BUS 

personal  &  business  -  computer  syslems 


the  COMPUTER  BUS,  101  River  St.,  Grand  River,  Ohio  44045 

Authorized ATf^m®  Dealer 


WWOfiDPRI 
Jin,  Micro 
WordP'O  1 
Soltwaie 


PROPACK  and  JINSAM  inc  traacmarHs  o' 
Sys'ens,  Inc 

IS  a  iraaemark  oi  Piolessionai 
Inc 


"This  module 
is  much  more 
powerful  than 
you  can 
imagine." 

Robert  Baker, 
February,  '81  KILOBAUD 

With  WORDPROPACK, 
JINSAM's  WORDPRO 
interface,  you  obtain 
the  ultimate  "state  of 
the  art"  business  tool. 
And,  WORDPROPACK 
is  just  one  of  seven  ac- 
cessory modules  and 
systems  available  with 
JINSAM  Data  Manager. 

JINSAM  is  Commodore 
approved.  JINSAM  is 
available  for  all  Com- 
modore 32K  microcom- 
puters. 

Send  only  $15  for  your 

own  84K  5  program 

demonstration  system 

or 

SEE  YOUR  NEAREST 

COMMODORE  DEALER 

FOR  A  DEMONSTRATION 

JINI  MICRO- 
SYSTEMS, INC. 

P.O.  Box  274  •  Riverdale,  N.Y.  10463 
PHONE;  (212)  796-6200 
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2080 

R'EM     SALARY  INCF;;EASE  LOOP  -  ADJUST  TO  F-F^ACTION 

2090 

FOR  SAL  -  SAL(l)  /  100  TO  SAL  (2)  /  100  STEP"  SAL  ( 3)  /  100 

2100 

REM 

2110 

PRINT  :  PRINT  "LOAN  *";IL0AN;"   INTEREST  RATE  "J  INT  (RYR  k  12 

000  +  0.5)  /  10"%" 

2120 

PRINT  "INF-LATION  "  INT  (COLI  *  1 0  0  0  +  0  . 5 )  /  1 0  "%   "f 

2130 

PRINT  "SALARY  $" J  SAL ( 0 ) "/MONTH" 

2140 

PRINT  "SALARY  INCREASE  "  INT  (SAL  *  1000  +  0.5)  /  10"%  " 

2150 

REM 

2160 

REM    MONTHLY  PAYMEINT  LOOP 

2170 

FOR  MPAY  =  MPAYd)  TO  MPAY(2)  STEP  MPAYO)      ' 

2180 

REM   INITIAL  (.JARIABLES 

2190 

OLOAN  =  ILOAN:  rem   LOAN  AMOUNT                 i 

2200 

TPAY  =  O:  REM   TOTAL  PAY                         i 

2210 

APAY  =  O:  REM   ADJUSTED  PAYMENT 

2220 

IMPACT  -  OJ  REM   SALARY  IMPACT 

2230 

REM   CAN'T  EiiE  DONE  IF  INTEEREST  INCREASE  AEiOVE  REPAYMENTS 

2240 

IF  OLOAN  *  RYR  <  MPAY  THEN  2270 

225  0 

PRINT  :  PRINT  "CAN'T  BE  DONE  @    *"J  INT  (MPAY  *  100)  /  100  J "/MO 

NTH":  GOTO  2530:  PRINT 

2260 

REM   LOOP  OVER  A  MAX  OF  50  YEARS 

2270 

PRINT  t  FOR  M  =  1  TO  600  0 

2280 

REM   IN  WHAT  YEAR  AND  WHAT  MONTH? 

2290 

YR  -   INT  < (M  -  1)  /  12)tMM  =  M  "  YR  X  12 

2300 

REM   NEW  INTEREST  SINCE  LAST  PAYMENT 

2310 

MI  =  OLOAN  X  RYR 

2320 

REM   OUTSTANDING  LOAN  AFTER  NEW  PAYMENT 

2330 

OLOAN  =  OLOAN  •♦•  MI  -  MPAY 

2340 

REM   TOTAL  AMOUNT  PAID 

2350 

TPAY  =  TPAY  +  MPAY 

236  0 

REM   INFLATION  ADJUSTED  AMOUNT  PAID 

2370 

APAY  =  APAY  ■♦•  MPAY  *  AV  '^  YR                  .  ' 

2380 

REM   SALARY  IMPACT 

2390 

IMPACT  =  IMPACT  +  MPAY  /  (SAL(O)  *  ( 1  +  SAL)  ^  YR) 

2400 

REM   L0/5iN  PAID  OUT? 

2410 

IF  OLOAN  <  0  THEN  25  0  0 

2420 

IF  EOY$  =  "N"  OR  MM  <   >  12  THEN   NEXT  Mt  GOTO  246  0 

2430 

>; 

.  2440 

PRINT  "*"J  INT  (MPAY  x  10  0)  /  10  0?"  YR  "YR  +  1"  T  V    INT  (TPAY 

PRINT  "  A  $"  INT  (APAY)"  I  "  INT  (IMPACT  >•<  100  /  M) 

245  0 

NEXT  M 

2460 

PRINT  "OUER  FIFTY  YEARS" 

2470 

REM 

248  0 

REM   PRINT  ON  THE  SCREEN                       t 

2490 

REM 

2500 

PRINT  "AFTER  "fYRJ"  YRS  "JMMf"  M  &    $";MPAY;"  /MONTH" 

2510 

PRINT  "TOTAL  $"?  INT  ( TPAY ), "ADJUSTED  $"?  INT  (APAY) 

2520 

PRINT  "IMPACT  FACTOR  "J  INT  (IMPACT  *  100  /  M) 

2530 

NEXT  MPAY 

2540 

NEXT  SAL 

255  0 

NEXT  COLI 

2560 

NEXT  RYR 

2570 

REM    DO  IT  AGAIN 

258  0 

PRINT  :  PRINT  "AGAIN  Y/N  "J  J  GOSUB  120  00 

2590 

IF  YN$  =  "Y"  THEN  1000 

26  0  0 

STOP 

9990 

REM 

9992 

REM   GET  A  RANGE  OF  VALUES 

9994 

REM 
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A 

Wooden 

Computer? 


Not  from  Commodore! 

So  why  should  the  desk  look  like  wood?  A  pleasant 
cream  and  charcoal  trimmed  desk  looks  so  much  better 
with  Commodore  systems.  One  look  and  you'll  see. 
Interlink  desks  are  right.  By  design. 

The  specifications  only  confirm  the  obvious: 


•Cream  and  charcoal 
color  beautifully  matches 
the  Commodore  hardware 
and  blends  with  your 
decor. 

•  An  ideal  710  mm  (28") 
keyboard  height  yet  no 
bumping  knees  because  a 
clever  cutout  recesses  the 
computer  into  the  desk- 
top. 

•  High  pressure  laminate 
on  both  sides  of  a  solid 
core  for  lasting  beauty 
and  strength. 

•Electrostatically  applied 
baked  enamel  finish  on 
welded  steel  legs— no 
cheap  lacquer  job  here. 


•T-molding  and  rounded 
corners  make  a  handsome 
finish  on  a  durable  edge 
that  won't  chip. 

•  Knocked  down  for  safe, 
inexpensive  shipment. 

•  Patented  slip  joints  for 
quick  easy  assembly. 

•  Leveling  glides  for 
uneven  floors. 

•Room  enough  for  a 
Commodore  printer  on  the 
desk,  yet  fits  into  nearly 
any  den  or  office  niche — 
H:  660  mm  (26")  W:  1170 
mm  (46")  D:  660  mm  (26"). 

•  Matching  printer  stand 
available  with  slot  for 
bottom  feeding. 


Price:  $299 


In  short,  as  Commodore  dealers,  we  won't  settle  for 
anything  that  looks  good  only  in  the  catalog!  Our 
customers  won't  let  us.  They  don't  buy  pictures.  And 
neither  should  you.  This  is  why  we  will  let  you  use  one  of 
our  desks  for  a  week  and  then  decide.  If  for  any  reason 
you  don't  like  it,  just  return  it  in  good  condition  for  a 
cheerful  refund. 


If  your  Cominodore  dealer  doesn't  carry  our  desks  yet, 
send  a  check  for  $299  and  we  will  ship  your  desk  freight 
paid! 

Name 


Address. 
City 


_St_ 


-Zlp- 


Interlink,  Inc.,  Box  134,  Berrien  Springs,  Ml  49103 
Master  Charge  and  Visa  welcome.  Call  our  order  line: 
616-473-3103 


COMMU- 
NICATE! 


McTerm 

Telecommunications 
For  The  Commodore 


"Your  Commodore  computer  becomes  a  very  inlelligenl  terminal. 
Operates  with  a  modem  over  ordinary  telephone  lines. 

•Let's  you  use  the  power  and  memory  ot  distant  mainframe 
computers.  Write  programs  on  your  micro,  run  ttiem  on  the  tiig 
ones, 

"Access  giant  data  bases  all  over  the  world. 

*Tune  into  Micronet  or  the  "Source"  for  up  to  the  minute  news, 
sports,  weather,  stock  market  reports,  electronic  mail  airline  reser- 
vations, games,  etc. 

"Automatically  record  all  or  any  part  of  your  transmissions  onto  disc 
or  printer. 

"Save  time  and  money  when  you  store  your  data  on  disk  and  send  it 
in  batch.  No  more  slow  on-line  data  entry.  Transfers  programs, 
sequential  data,  or  WordPro  files. 

"Sends  and  receives  on  the  PET  mucti  faster  than  anything  else  on 
the  market  -  up  to  1200 baud. 

•Customize  I^cTerm  to  meet  your  needs:  have  a  number  of  stores 
that  need  to  communicate?  Link  them  with  Mzlerm. 

"Auto  dial/auto  answer  available  as  option. 

***"*  Only  $195  complBte*"** 

Features: 

•Baud  selection  from  75  to  1200 

•Full  and  half  duplex,  local  echo 

•Supports  odd,  even,  and  mark  parity 

"CRC.  error  checking  for  transfers  between  PETS 

•Works  with  3.0 or  4.0  Basic.  1 .0  or  2.0  DOS.  40 or 

80  col.  computers.  2040, 4040.  or  8050  disk  drives, 

•Works  with  most  RS-232  modems 


YES!  SEND  ME  THE  FOLLOWING: 
LCompiete     McTerm     Communications     package     with 
gram,  ROfVI,  cable  and  manual.  I've  enclosed  $195.00. 
Disk  drive?  [22040  GBOSO 
Basic  Version?  D4.0  Dolher 
CSend  more  information  on  McTerm. 

Name  


pro- 


Address 


-Zip- 


^c 


DISON 

OMPUTER 


1825  fi/lonrae  Street 

Madison,  Wl  53711 

(608)255-5552 

Dealer  Inouiries  Welcome 


'  Call  for  info  on  communications  for  the  VIC  *** 
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i  0  0  0  0 

10  010 


PF^IINT 

pf;:int 


'LOW    ' 
'HIGH 


DUMMY    ^ 
: DUMMY 


DUMMY(i) ; 
■■    [)IJMMY<2) 


G  0  S  U  B    1 1  0  0  0  t  D I J  M  M  Y  (1  )     ^■■■■■-    [)  U  M  M  Y 
GQSUB    11  0  0  0  :  DUMMY  (;:!)    -    DUMMY 


10020 
10Q30 
10  0^0 
10  050 
10  060 
10070 
10990 
10  991 
10992 
11000 

0 
11010 
11020 
11030 
110-^0 
11050 
11060 
11070 
11080 
11990 
11991 
11992 
11993 
120  0  0 
12010 
12020 
12030 
120^0 
1299  0 
12991 
12992 
13  0  0  0 
13010 
13  02  0 
13030 
130^0 
13050 


IF    DUMMY <2) 


DUMMY  <1)     THE:N      F'F\-INT 
use:    5    STEPS 


"INUALID":    GOTO    10  0  00 


Fl'EIM         IF    A    F;ANGF    THEN 
DUMMY (3>    -    (DUMMY(2)     -    DUMMY(l))    /    5 
FiEM       WATCH    FOR    ZERO    STEPS     -    NASTY    THINGS 
IF    DUMMYC3)    ^    0    THEN    DUMMY(3)    -    1 
PRINT     J    RETURN 
REM 

REM       GET    A    UAUUE 
REM 
PRINT    "PRESENT    UALUE    "J  DUMMY:    PRINT    "NEW    VALUE 


GO  sue;:     1.3  0  0 


REM         RETAIN    OLD 
IF    DUMMYIi    ■■■■■■^    •'"    TH 
REM       CHECK    IF    ZER 
DUMMY    -       UAL     (OUMM 


VALUE? 

EN    DUMMY*    ==       STR$     (DUMMY) 

D    UALUE 

Y$)I    IF    DUMMY    >    0    THEN      RETURN 

PRINT    "INUALID"t    GOTO    11000 
OKAY?    Y/N    ■'?  ;    GOSUB    12000 

PRINT    "CORRECT    VALUE":    GOTO    11000 


OR    NO    ANSWER 


IF    DUMMY    <    0    THEN 
PRINT    "ZERO    VALUE 
IF    YN$    ■■=    "N"    THEN 
RETURN 
REM 

REM       GET    A    Y 
REM 

REM         NULL    RETURNS    ARE    ILLEGAL 
GGSUE!    13000:    IF    DUMMY$    -    ""    THEN    120'^0 
FIRST    CHARACTER    ONLY    OF    INTEREST 

Y*,l) 

N$    =    "N"    THEN       RETURN 


REM 
YN*    =       LEFT*    (DUMM 

IF    YN*    =    "Y"    OR    Y 

PRINT    "ANSWER    YES 

REM 

REM       GET    AN    INPUT 

REM 
DUMMY*    =    "" 

GET    A$ 

REM       IS    IT    A    PACK 

IF    A*    =       CHR*     (8) 

PRINT    A$::    IF    A* 
DUMMY*    -    DUMMY*    + 


LINE 


SPACE?    THEN    DELETE    WHOLE    LINE 

THEN       PRINT    "JKJKDELETEDx*"  :     GOTO 
=       CHR*     (13)    THEN       RETURN 
A$:    GOTO    13010 


1 3  0  0  0 


MEMOREX 

Floppy  Discs 

Lowesi  prices  WE  WILL  NOT 
BE    UNDERSOLDt!    Buy    any 

quantity  1-1000  Visa.  Masiercharge 
accepted  Call  free  1800)235-4137 
for  prices  and  information  All 
orders  seni  postage  paid 

PACIFIC   EXCHANGES 

iiKi  r.>i>itiiii  Bivii 

San  Luis  Obispo  CA 
q.l'IOl  (In  Cfll  call 
IMIIS.  SJ  Villi?  I 


GIVE  YOUR  COMMODORE  PET/CBM  KSS3Z  COMMUNtCATIOKS  CAPABILITIES 

1  TE3DDtProarsmandC3blei  .     .   S150 
TTL  level  RS232  Terminal  Emjiator,  upper/lowercase,  escape.  deliKe.  and  split 
cammunicatians  speeds,  5D-6DD  baud  receive.  5D  2400  baud  transmit 

2  TE3DD-FTCIProgram  and  cable) $220 

same  35  TE3Q0  plus  extended  file  transfer  capabilities  i  e  send  file  i  tram  PET  disk 

to  computer  and  bacit 

3  HS23S  Printer  [Program  and  cable!  S   75 

print  any  sequential  or  WordPro  file,  up  to  4flDQ  baud 

4  RSc?3c?  Program  Printer  [Prpgrarn  andcableJ       S  75 

format  and  print  BASIC  programs,  up  to  4  BDD  baud 

5  TTL-RS332C  (Hardware  interface!  S100 

convert  TTL  level  signals  to  RS232C  levels 

e  PET-SELECTBIC  Printer  IProgram  and  cablei        S12S 

same  as  RS232  Printer  plus  ASCI  I  to  E  BtlOiC  conversiwis.  also  auto-underscore. 
1  34.5baud,  requires iten^ 5 

7  PET-SELECTHIC  Program  Printer  IProgram  and  cable! $125 

same  as  RS232  Program  Printer  plus  ASCII  to  EBCDIC  conversions  1  34, 5  baud 
requires  item  5 

N  G  all  progrems  come  on  diskettes 

PH.D .  Associates  Inc.         1 07  Fordwicfi  C  res. 

Reidaie.OnC.  M9WZTE     Canada     14161742-6425 


Julv.  1981.  Issue  Id 
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OMNIFILE  CBMorTRS-80  $30 

Omnifite  is  a  versatile,  in-memory  database  program  with  sorting,  formatting,  and  computational  features. 
Records  can  be  entered,  edited,  and  processed  withi  a  single  letter  command.  Omnifile  applications  include 
inventory  records,  mailing  lists,  sales  journals  and  collection  lists.  Records  can  be  stored  on  tfie  Commodre  floppy 
disks  or  on  tfie  tape  cassette.  Omnifile  uses  approximately  6k  of  RAM  memory.  U  p  to  500  records  can  be  contained 
in  memory  in  a  32k  CBM  at  any  time.  M  ultiple  files  are  easily  accessed  from  disk  or  tape.  Items  can  be  sorted,  moved, 
inserted  and  reformatted.  Calculations  can  be  made  and  totals  can  be  printed.  Ttie  Omnifile  package  includes  the 
program  with  sample  data,  listing  and  manual,  and  will  operate  on  the  large  keyboard  Commodore  PET  or  CBM 
computers  with  at  least  16k  memory.  Also  available  on  diskette  for  $36.  An  abbreviated  version,  Data  Logger, 
requiring  only  1  k  of  RAM  is  available  on  cassette  for  $1 5. 

GENERAL  LEDGER/PERSONAL  LEDGER  CBMorTRS-80  $30 

General  Ledger  is  a  complete  double  entry  bookkeeping  system  with  provisions  for  budgeting  and  keeping 
records  of  income,  deductible  and  non-deductible  expenses,  assets  and  liabilities.  Simple  interactive  features  allow 
entering  transactions,  adding  or  editing  accounts,  and  printing  of  a  detailed  income  statement  and  balance  sheets. 
Data  can  be  stored  on  the  Commodore  floppy  disks  or  cassette.  General  Ledger  occupies  about  6.2k  of  RAM 
memory,  allowing  approximately  200  accounts  on  a  16k  machine.  Transaction  files  can  be  accessed  by  ourOmnifile 
database  program  for  complete  analysis,  sorting  by  date,  account  number,  etc.  The  General  Ledger  program  will 
operate  on  the  new  Commodore  PET  or  CBM  microcomputer  systems  and  comes  with  sample  data,  listing,  and 
manual.  Also  available  on  diskette  for  $36.  An  abbreviated  version  allowing  about  35  accounts  on  a  1 .0  or  2.0  BASIC 
8k  PET  is  available  on  cassette  for  S20. 

EXPLORE  CBM  $15 

Inspired  by  the  computerized  fantasy  simulation  "Adventure,"  Explore  is  a  conversational  program  which  operates 
on  the  Commodore  PET  with  only  Sk  bytes  of  memory.  Explore  contains  four  adventures  in  which  you  operate  a 
computerized  tank,  hunt  treasure  in  a  magic  cave,  explore  the  mall  in  Washington  D.C.,  and  survive  in  a  haunted 
castle.  Explore  package  includes  introduction,  five  data  files,  and  complete  manual.  Available  from  Channel  Data 
Systems  on  cassette  for  SI  5.  Indication  of  old  or  new  ROMs  is  requested. 

CHANNEL  DATA  BOOK  for  PET  CBM  $20 

A  complete  hardware  and  software  reference  service  listing  descriptions  for  over  1400  software  programs  and 
over  200  peripheral  devices  for  PET.  Also  includes  an  information  sources  section,  and  addresses  for  Commodore 
Dealers  in  the  USA  and  Canada,  Commodore  Vendors,  and  PET  user  groups.  Designed  to  organize  documentation, 
newsletters,  listings,  and  other  user  selected  information  in  an  attractive  3-ring  binder. 

ACCESSORIES 

PORT  NOISE  COMPLETE  Speaker-amplifier  for  Commodore  PET  or  CBM  with  connector  (M  &  N  pin)  ail 

ready  to  plug  in— $20. 
IEEE/USER  PORT  CONNECTOR  24  pin  connector.  With  backshell-S7.  Without  backshell-S4. 
C-10TAPE  CASSETTES  High  quality  AGFA  tape  with  screw  type  case.  SI  0/10  or  S75/100. 

Cash,  Checks,  Money  Orders,  VISA,  Mastercharge 
Add  $2  shipping  for  each  order— C0D-$3. 50 
For  foreign  orders  please  inquire  for  pricing 

CHANNEL  DATA  SYSTEMS 

4141  State  Street    Santa  Barbara,  CA  93110    805-964-6695 


Microcomputer  Measurement  And 
Control  For  PET,APPLE,KIM  and  AIM65 


The  world  we  live  in  is  full  of  variables  we  want  to 
measure.  These  include  weight,  temperature,  pressure, 
humidity,  speed  and  fluid  level.  These  variables  are 
continuous  and  their  values  may  be  represented  by  a 
voltage.  This  voltage  is  the  analog  of  the  physical 
variable.  A  device  which  converts  a  physical, 
mechanical  or  chemical  quantity  to  a  voltage  is  called 
a  sensor. 

Computers  do  not  understand  voltages:  They 
understand  bits.  Bits  are  digital  signals.  A  device 
which  converts  voltages  to  bits  is  an  analog-to-digital 
convener.  Our  AIM  16  (Analog  Itiput  Module)  is  a  16 
input  analog-to-digital  converter. 

The  goal  of  Connecticut  microCompuler  in 
designing  the  uMAC  SYSTEMS  is  to  produce  easy  to 
use,  low  cost  data  acquisition  and  control  modules  for 
small  computers.  These  acquisition  and  control 
modules  will  include  digital  input  sensing  (e.g. 
switches),  analog  input  sensing  (e.g.  temperature, 
humidity),  digital  output  control  (e.g.  lamps,  motors, 
alarms),  and  analog  output  control  (e.g.  X-Y  plotters, 
or  oscilloscopes). 

Connectors 

The  AIM  16  requires  connections  10  its  input  port 
(analog  inputs)  and  its  output  port  (computer  inter- 
face). The  ICON  (Input  CONncciar)  is  a  20  pin, 
solder  eyelet,  edge  connector  for  connecting  inputs  to 
each  of  the  AlMIS's  16  channels.  The  OCON  (Output 
CONnector)  is  a  20  pin,  solder  eyelet  edge  connector 
for  connecting  the  computer's  input  and  output  ports 
to  the  AIM16, 

The  MANMODl  (MANifoid  MODulc)  replaces 
the  ICON.  It  has  screw  terminals  and  barrier  strips  for 
all  16  inputs  for  connecting  pots,  joysticks,  voltage 
sources,  etc. 

CABLE  A24  (24  inch  interconnect  cable)  has  an 
iriterface  connector  on  one  end  and  an  OCON 
equivalent  on  the  other.  This  cable  provides  connec- 
tions between  the  uMACSYSTEMS  computer  inter- 
faces and  the  AIM  16  or  XPANDRl  and  between  the 
XPANDRl  and  up  to  eight  AIM  16s. 


Analog  Input  Module  . 

The  AIM  16  is  a  16  channel  analog  to  digital  converter 
designed  to  work  with  most  microcomputers.  The 
AIM  16  is  connected  to  the  host  computer  through  the 
computer's  8  bit  input  port  and  8  bit  output  port,  or 
through  one  of  the  uMAC  SYSTEMS  special  inter- 
faces. 

The  input  voltage  range  is  0  to  5.12  volts.  The  in- 
put voltage  is  converted  to  a  count  between  0  and  255 
(00  and  FF  hex).  Resolution  is  20  millivolts  per  count. 
Accuracy  is  O.S^o  ±  I  bit.  Conversion  time  is  less 
than  100  microseconds  per  channel.  All  16  channels 
can  be  scanned  in  less  than  1 .5  milliseconds. 

Power  requirements  are  12  vohs  DC  at  60  ma. 

POWl 

The  FOW!  is  the  power  module  for  the  AIM  16.  One 
POWI  supplies  enough  power  for  one  AIM16,  one 
MANMODl,  sixteen  sensors,  one  XPANDRl  and  one 
computer  interface.  The  POWI  comes  in  an  American 
version  (POWI a)  for  110  VAC  and  in  a  European  ver- 
sion (POWIe)  for  230  VAC. 


TEMPSENS 


This  module  provides  two  temperature  probes  for  use 
by  the  AIM  16.  This  module  should  be  used  with  the 
MANMODl  for  ease  of  hookup.  The  MANMODl 
will  support  up  to  16  probes  (eight  TEMPSENS 
modules).  Resolution  for  each  probe  is  I'F. 


Remote  Controller- 
Clock  and  Calendar 

AN  INEXPENSIVK  CONTROL 
SOLUTION  I  OR 
HOME  SECURITY  •  ENERGY  CON- 
SERVATION •  GREENHOUSES 

•  ENVIRONMENTAL  CONTROL 

•  INDUSTRIAL  CONTROL 

•  LABORATORIES 

SUPER  X-10  MOD  SPECS 

1.  Remote  controller 

Controls  up  to  256  different  'cmote  devices  by  sen- 
ding signals  over  the  house  wiring  to  remote 
modules.  Uses  0SR  remote  modules  available  all 
over  the  USA  (Scars,  Radio  Shack,  etc.).  Does  not 
require  BSR  control  module.  Docs  not  use  sonic 
link. 

2.  Clock/calendar 

Time  of  day  -  hours,  minutes,  seconds 

Date  -  month,  day  ■  aulomalc.illy  corrects  for 

28,29,30  and  31  day  months.  Hay  of  the  week. 

3.  Digital  input/outputs 

8  inputs  -  TTL  levels  or  swittli  closures. 
Can  be  used  as  a  trigger  foi  a  stored 
sequence. 

8  outputs  -  TTL  levels 
Power  supply  included  llOVAC  only. 

XPANDRl 

The  XPANDRl  allows  up  to  cighi  Input/Output 
modules  to  be  connected  to  a  computer  ai  one  lime. 
The  XPANDRl  is  connected  to  the  computer  in  place 
of  the  A1M16  or  XIO  MOD.  Up  to  eight  AIMI65  or 
seven  Aim  16s  and  one  XIO  MOD  are  then  connected 
to  each  of  the  eight  ports  provided  u.sing  a  CABLE 
A24  for  each  module. 


For  your  convenience  the  AIM  16  and  the  XIO  MOD  come  as  part  of  a  number  of 
sets  The  minimum  configuration  for  a  usable  system  is  the  AIMI6  Starter  Set  1 
which  includes  one  AIMI6,  one  POWI,  one  ICON  and  one  OCON.  The  AIMI6 
Starter  Set  2  includes  a  MANMODl  in  place  of  the  ICON.  The  minimum  configura- 
tion for  a  usable  system  is  the  XIO  MOD  Starter  Set  which  includes  one  XIO  MOD. 


one  ICON  and  one  OCON.  These  sets  require  that  you  have  a  hardware  knowledge 
of  vour  computer  and  of  computer  interfacing. 

For  simple  plug  compatible  systems  we  also  offer  computei  interfaces  and  sets 
for  many  computers. 


AIM16  H'-OO 

SUPER  XIO  MOD  (1 10  VAC  only) M9.00 

POW  la  (POWer  module-l  10  VAC) 14.95 

POWie  (PQWermodule-230  VAC) 24.95 

ICON  (Input  CONnector) 9.95 

OCON  (Output  CONnector) 9.9S 

MANMODl  (MANifoid  MODuIe)  59.95 

CABLE  A24  (24  inch  interconnect 

cable)  19-« 

XPANDRl  (allows  up  to  8  Input  or 
Output  modules  to  be  connected  to  a 

computer  at  onetime) 59,95 

TEMPSENS2Pi  (two  temperature  probes, 

-10°F  to  I60'F) *9-'5 

LIGHTSENSIPI  (light  level  probe) 89.95 

The  following  sets  include  one  A1MI6, 
one  POWI,  one  OCON  and  one  ICON. 

AIMI6  Starter  Set  la  ( 1 10  VAC) 189.00 

AIM16  Starter  Set  le  (230  VAC) 199.00 

All  prices  and  specifications  subject  10  changie  without 
notice.  Our  30-day  money  back  Buarantee  applies. 


The  following  sets  include  one  A1M16, 

one  POWI,  one  OCON  and  one  MANMODl. 

A1MI6  Starter  Set  2a  ( 1 10  VACI 239.00 

AIM  16  Starter  Set  2e  (230  VAC) 249,00 

The  following  modules  plug  into  their  respective 
computers  and,  when  used  with  a  CABLE  A24, 
eliminate  the  need  for  custom  wiring  of  the  computer 
interface. 

PETMOD  (Commodore  PET) 49,95 

KIMMOD  (KIM,SYM) -39-95 

APMOD  (APPLE  II) 59.95 

TRS-80MOD  (Radio  Shack TRS-80) 59.95 

AIM65  MOD(AlM  65)  39.95 

The  following  sets  include  one  AIMI6,  one  POWI.  one 
MANMODl,  one  CABLE  A24  and  one  computer  inter- 
face module 
PETSETIa  (Commodore  PET  - 

IIOVAC) 295.00 

PETSETIe  (Commodore  PET  - 

230  VAC) 30S.0O 


KlMSETIa  (KIM,SYM,AIM65  - 

IIOVAC) 285.00 

KIMSETle  (KIM,SYM,AIM65  - 

230  VAC) 295.00 

APSETla(APPLE  II  ■  1 10  VAC) 295,00 

APSETIc(APPLE  11-230  VACi    305.00 

TRS-80  SETla  (Radio  Shack  TRS-80  - 

IIOVAC) 295.00 

TRS.80  SETIc(Radio  Shack  TRS-SO  ■ 

230  VAC) 305.00 

AIM65  SETIa(AIM65-1 10  VAC) 285.00 

AIM65  SETleiAlM65-230  VAC) ,295.00 

The  following  sets  include  one  XIO  MOD,  one 
CABLE  A24.  one  ICON  and  one  Jomputcr  interface 
module. 

PETSLT2(Coinmodore  PET) 295.00 

KIMSf-;T2(KIM,SVM) - 285.00 

APSET2(APPI,L  II)   295.00 

TRS-80  SET2  (R.idio  Shack  TRS-SO) 295.00 

AIM65  SET2  (AIM65) 285.00 

SUPER  XIO  MOD/XPANDRI  SI-.T2  (if  you  already 
havcaSETl) 295,00 


Printer  And  Communication  Interfaces  For  The  CBM/PET 


SADI   Fj?'-  Serial 

Two-way 

Communication, 

Parallel 

Printers, 

and  Serial 

Printers 


ADA1600  •  For  Parallel  NEC 
and  Centronics  Standard  Printers 


SADl  •  The  microprocessor  based  serial  and  parallel  inierface  for  the 
Commodore  PET.  SADl  allows  you  lo  conneci  your  PET  lo  parallel 
and  serial  printers,  CRT's,  modems,  acoustic  couplers,  hard  copy  ser- 
minals  and  other  computers.  The  serial  and  parallel  ports  are  indepen- 
dent allowing  the  PET  to  communicatE  with  both  peripheral  devices 
simultaneously  or  one  at  a  time.  In  addition,  the  RS-232  device  can 
communicate  with  the  parallel  device. 
Special  Features  for  the  PET  inierface  include; 

Conversion  to  true  ASCII  both  in  and  out 

Cursor  controls  and  function  characters  specially  primed 

Selectable  reversal  of  upper  and  lower  case 

Addressable  -  works  with  other  devices 
Special  Features  for  the  serial  interface  include: 

Baud  rate  selectable  from  75  to  9600 

Half  or  full  duplex 

32  character  buffer 

X-ON,  X-OFF  automatically  sent 

Selectable  carriage  return  delay 
Special  Features  for  the  parallel  interface  include: 

Data  strobe  -  either  polarity 

Device  ready  -  either  polarity 

Centronics  compatible 
Complete  with  power  supply,  PET  IEEE  cable,  RS-232  connector, 
parallel  port  connector  and  case.  Assembled  and  tested. 

SADIa(110VAC)$295 

SADIe  (230V ACI  $325 


The  ADA1600  is  a  low  cost  easy  to  use  interface  for  the  Commodore  Computers.  It  allows  the  PET  and  CBM  computers  to  use  standard  Centronics  type  primers  (in- 
cluding the  NEC  5530)  for  improved  quality  priming.  The  ADAieOO  has  a  two  foot  cable  which  plugs  into  the  PET  IEEE  port.  Another  IEEE  card  edge  connector  is 
provided  for  connecting  disks  and  other  peripherals  to  the  PET.  The  ADA1600  is  addressable  and  does  not  tie  up  the  bus.  The  address  is  switch  selectable.  A  four  foot 
cable  with  a  standard  36  pin  Centronics  connector  is  provided.  A  switch  selects  upper/lower  case,  upper/lower  case  reversed  (needed  for  some  Commodore  machines) 
and  upper  case  only  for  clearer  program  listings.  Works  with  WORDPRO,  BASIC  and  other  software.  No  special  programming  is  required.  The  case  measures  3  1/2  x 
5  3/4  inches.  Comes  complete,  assembled  and  tested,  with  case  and  cables.  Power  is  obtained  from  the  printer  or  an  external  power  supply  may  be  used.  Rciail  price 
for  the  ADAI600  is  S129. 


ADA1450  •    Serial  Printer  Adapters 


The  ADAH-^O  is  a  low  cost,  easy  to  use  serial  inierface  for  the  Commodore  Computers.  It  allows  the  PET  and  CBM  computers  to  use  standard  serial  printers  for  m- 
proved  quality  printing.  The  ADA1450  has  a  two  foot  cable  which  plugs  into  the  PET  IEEE  port.  Another  IEEE  card  edge  connector  is  provided  for  connecting  disks 
and  other  peripherals  to  the  PET.  The  ADAI450  is  addressable  and  does  not  tie  up  the  bus.  The  address  is  switch  selectable.  A  six  fool  RS-232  cable  is  provided  with  a 
DB25  connector.  Pin  3  is  data  out.  Pins  5,6  and  8  act  as  ready  lines  to  the  printer.  Pins  4  and  20  act  as  ready  lines  from  the  printer.  These  lines  can  be  switched  lor 
non-standard  primers.  Baud  rate  is  selectable  to  9600  baud.  A  switch  selects  upper/lower  case,  upper/lower  case  reversed  (needed  for  some  Commodore  machines)  and 
upper  case  only  for  clearer  program  listings.  Works  with  WORDPRO,  BASIC  and  other  software.  No  special  programming  is  required,  The  case  measures  3  l/A,\'„ 
3/4  inches.  Comes  complete,  assembled  and  tested,  with  case,  cables,  power  supply  and  .software  on  cassette  for  graphing  functions,  formalling  data  etc.  I  he  AUAtiju 
has  a  female  DB25  connector  at  the  end  of  the  RS-232  cable  for  most  standard  primers.  The  ADAI450N  has  a  male  DB25  at  the  end  of  the  RS-232  cable  lor  the 
DIABLO  serial  printers.  Retail  price  for  the  ADAI4.W  or  !450N  is  SI39. 

ADA730  Parallel  •  For  the  Centronics  730  and  737  Printers 

The  ADA730  is  a  low  cost  easy  to  use  interface  for  the  Commodore  Computers.  It  allows  the  PET  and  CBM  computers  lo  use  Centronics  type  730  and  737  primers, 
The  ADA730  has  a  two  fool  cable  which  plugs  into  the  PET  IEEE  port.  Another  IEEE  card  edge  connector  is  provided  for  connecting  disks  and  other  peripherals  to 
the  PET.  The  ADA730  is  addressable  and  docs  nol  lie  up  the  bus.  The  address  is  switch  selectable.  A  cable  with  a  36  pin  card  edge  connector  is  provided.  A  switch 
selects  upper/lower  coase.  upper/lower  case  reversed  (needed  for  some  Commodore  machines)  and  upper  case  only  for  clearer  program  listings.  Works  with  WORD- 
PRO, BASIC  and  other  software.  No  special  programming  is  required.  The  case  measures  3  1/2x5  3/4  inches.  Comes  complete,  assembled  and  tested,  with  case  and 
cables.  Power  is  obtained  from  the  primer  or  an  external  power  supply  may  be  used.  Retail  price  for  the  AD.\  is  Sl-49. 


G  m  0 


SOFTWARE 


Word 


QUANTITY      DESCRIPTION        PRICE    TOTAL 


Word  Processor 
Program  • 

PET  Word  Processor.  On  tape  - 

S39,50,  On  disk  ■  49.50 

For  8K  Pets  29.50 

For  16K  and  32K  Pets  39.50 

Compose  and  print  letters,  flyers, 

ads.  manuscripts,  etc.  Uses  disk  or 

tape.  30  page  manual  included. 


ADA400 
RS-232 
To  Current 
Loop 
Adapter 


SUBTOTAL 


Handling  and  shipping  —  add  per  order 


$4.00 


Foreign  orders  add  lO^o  for  AIR  postage 
Conn,  residents  add  7%  sales  tax 


TOTAL  ENCLOSED 


NAME    _ 

COMPANY 

ADDRESS 


CITY  _ 
STATE  . 


.ZIP. 


VISA  O  M/C  O  Expiration  date  _ 
Card  number _^ 


Mention  this  magazine  and  deduct  lit  from  Ihe  TOTAL 


RS-232  to  current  loop  adapter  (ADA  400). 

$29.50 

Two  circuits  -  1  each  direction.  Run  an  RS-232 

device  off  a  computer's  teletype  port  or  vice 

versa.  Optoisolated. 


ADA4005  ■  Solder  Pads  24.50 
ADA400B  •  Barrier  Strips  with  screw 
terminals  29.50 


In  the  US  order  from:  Connecticut  Microcomputer,  Inc. 
34  Del  Mar  Drive  Brookfield,  CT  06804  (203)  775-4595 
In  Canada  order  from:  Batteries  Included,  LTD 
71  McCaui  St.  F6  Toronto,  Canada  M5T2X1  (416)596-1405 


i^mLS 


Connecticut  microcomputer,  inc. 

34  Del  Mar  Drive,  Brookfield,  CT  06804 
203  775-4595  TWX:  710  456-0052 
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Home  Heating 
And  Cooling 
Audit 

David  E.  Pitts 
Houston,  JX 

Have  you,  like  thousands  of  Americans,  afklcd 
insulation,  storm  windows,  a  selbaci<  thcrniosiat, 
and  caulking  to  improve  the  energy  efficiency  of 
your  liome?  Other  than  the  159?  energy  credit  you 
could  claim  on  yoiu"  taxes  starting  in  1979,  il  is 
difficult  to  know  what  savings  one  is  achieving  with 
these  substantial  investments  of  time  and  money.  A 
colder  than  normal  winter  will  cause  increased  fuel 
usage  for  heating  which  may  or  may  not  over- 
shadow the  energy  savings  by  insulating.  On  the 
other  hand,  last  winter  (1979-80)  was  so  mild  in 
most  parts  of  the  United  States  that  it  brought 
significant  fuel  savings  for  most  homeowners 
whether  they  insulated  or  not.  However,  energy 
costs  have  increased  so  much  in  some  areas  and  for 
some  fuels  that  these  consumers  may  not  have 
achie\'ed  a  monetary  savings. 

The  cost  for  heating  or  cooling  a  house  is  due 
to  three  things: 

1)  outside  temperature 

2)  thermostat  setting 

3)  insulation  (including  air  infiltration) 
Only  the  last  two  are  under  the  homeowner's 


control.  The  most  cost-effective  action  a  home- 
owner can  take  is  to  raise  the  thermostai  in  tlie 
summer  and  lower  the  thermostai  in  winter.  The 
next  most  effective  is  to  increase  the  insulation. 
Having  done  this,  the  fuel  use  will  still  be  driven  bv 
the  outside  temperature.  In  order  to  compare  tlie 
se\'erity  and  piedict  fuel  use,  meteorologists  have 
developed  two  concepts: 

1)  Heating  degree  day 

2)  Cooling  degree  day 

Heating  degree  day  is  an  estimate  of  the  heating 
necessary  in  the  winter  and  cooling  degi  ce  day  is 
an  estimate  of  the  cooling  necessary  in  the  summer. 


...  energy  fuel  savings 

as  well  as  economic  savings 

can  be  calculated ... 


Both  are  calculated  from  the  maximum  ;ind  min- 
imum temperatures  and  summed  each  day  to 
accumulate  monlhlv  and  yearlv  totals.  Heating 
degree  days  accumulate  on  da)s  with  an  a\erage 
temperature  cooler  than  65°  F,  and  cooling  degree 
days  accumulate  on  days  with  an  average  tempera- 
ture waiiner  than  65°  V.  rhcse  data  are  icctjrded 
for  several  hundred  stations  in  the  United  States 
and  are  available  in  a  publication  "Local  Ulimato- 
logical  Data"  from  tlie  U.S.  Dept.  of  Coriincrce, 


Oct.      Nov.      Dec.      Jan.       Feb.    March    April     May      June      July 


Figure  1.  Heating  Degree  Days  by  Month  for  1979-80 
in  Houston,  TX  and  Natural  Gas  Used  in 
the  Author's  Residence. 


80  COLUMN  GRAPHICS 


*.:  cnmrnodort^ 


The  image  on  the  screen  was  created 
by  the  program  below. 


10  VISMEM:  ClEAS 

20  P=160:  Q=iOO 

30  X?=144:  XR=1. 5*3. 1415927   . 

40  Y-p=56;  YR=1;  2P=64 

50  XF=XR/XP:  YF=-^P/yR:  ZF=XR/ZP 

60  FOR  ZI=-Q  TO  Q-1 

70    IF    ZK-ZP  OR  ZX>ZP  GOTO   150 

80    ZT=ZI*XP/Z?;    ZZ=ZI 

90  XL-INT (. 5+SQR (XP*XP-ZT*ZT) } 
100  FOR  X1=-XL  TO  XL 
110  XT=SQR(XI*XI+ZT*ZT)*XF:  XX=XI 
120  YY=(SIN{XT)t.4*SIH(3*XT)}*YF 
130  GOSUB  170 
140  NEXT  XI 
150  NEXT  ZI 
160  STOP 
170  Xl=XX+ZZ+P 
130  V1=YY-ZZ+Q 

190  GHODE  1:  MOVE  XI, Yl:  WRPIX 
200  IF  V1=0  goto' 220 
210  GMODE  2:  LINE  Xl,Yl-l,Xl,0 
220  RETURN 


'm 


CBM  ^^^V      The  Integrated 

"*«<  «">  oomBL.— _   ^^^^      Visible  Memory  for 

the  PET  has  now  been 
redesigned  for  the  new 
12"  screen  80  column 
and  forthcoming  40 
column  PET  computers 
from  Commodore.  Like 
earlier  MTU  units,  the 
new  K-1 008-43  package 
mounts  inside  the  PET 
case  for  total  protection. 
^         To  make  the  power  and 
flexibilityof  the320by  200 
bit  mapped  pixel  graphics  display  easily  accessible,  we  have 
designed  the  Keyword  Graphic  Program.  This  adds  45 
graphics  commands  to  Commodore  BASIC.  !f  you  have  been 
waiting  for  easy  to  use,  high  resolution  graphics  for  your 
PET,  isn't  it  time  you  called  MTU? 

K-1008-43M  Manual  only  $10  (credited  toward  purchase) 
k-1008-43  Complete  ready  to  install  package  $495 

Mastercharge  and  Visa  accepted  ^JHgnsg^'gjggJSJ^?-^'^ 

Write  or  call  today  for  our  full  line  catalog  describing  all 
MTU  6502  products,  including  our  high  speed  8"  Floppy 
Disk  Controller  for  up  to  4  megabytes  of  PET  storage. 


■I';  *gji  v*r->  I't'iVii'  ^'  '^^ 


Micro  Technology  Unlimited 

'  280B  Hillstjorouqh  Stfeel 
■    P,D.  Box  12106   ■  c^K^-. 

Raleigh.  NC  27605.  U.S.A.         =^"^" 

19191 8331458 


mm^ 
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RUN 


YEAR  BY  YEAR  HEATING  CONSERVATION  AUDIT 


STATE  (DON'T  ABBREVIATE)?  TEXAS 

THE  WINTER  DP  1V73-74  IS  CALLED  7^,  CHOICES  ARE  7^  TO  80 

STARTING  YEAR?  78 
LAST  YEAR?  80 

CHOICES  OF  INPUT  ARE  BY  YEAR  OR  MONTH 
BY  YEAR  (Y  OR  N)?  Y 

UNITS  OF  FUEL  CAN  BE  ANYTHING!  GALLONS,  KWH,  CUFT^  lOOCUFT 
ALL  FUEL  ENTRIES  MUST  BE  THE  SAME  UNITS 


YEAR=      78 

FUEL    USE    FOR    OCT    1    TO    MAY    1?    650 

COSKDOLLARS)?    205,05 


I 


YEAR-   79 

FUEL  USE  FOR  OCT  1  TO  MAY  1?  526 

COST(DOLLARS)?  182,70 

YEAR==   80 

FUEL  USE  FOR  OCT  1  TO  MAY  1?  318 

COST(DOLLARS)?  120,60 


FUEL  USE  FOR 

JULY?  10 

STATE 

CITY 

1 

TEXAS 

BROWNSVILLE 

2 

TEXAS 

AMARILLO 

3 

TEXAS 

FORT  WORTH 

4 

TEXAS 

HOUSTON 

CHOOSE  *  OF  CITY?  ^ 

CHOSEN  CITY=  HOUSTON 


YEAR 
79 
80 


RATE 
.37 


FUEL  SAVINGS 
15.88 
178.1 


RATE  (1ST  YEAR)=-        .31 
SAVINGS (DOLLARS) 

>J  .  j1 

67.5^ 


1 

TEXAS 

2 

TEXAS 

3 

TEXAS 

^ 

TEXAS 

(+  ^-    SAVINGS)  (-  = 
BROWNSVILLE 
AMARILLO 
FORT  WORTH 
HOUSTON 


CHOOSE  *  DP  CITY? 


LOSS) 


GK 
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The  SM-KIT  is  a  callBctionof  machine  language  firmware  programming  and  lest  aids  lor 
BASIC  programmers.  SM-KIT  is  a  4K  ROM  (Iwice  the  normai  capacity)  which  you 
simply  Insert  in  a  single  ROM  socket  on  any  BASIC  4  CBM/PET-either  80  column  or  40 
column.  Includes  twth  programming  aids  and  disk  handling  commands 

ERROR  DETECTION   the  SM-KIT  automatically  indicates  the  erroneous  line  and 

statement  for  any  BASIC  program  error, 

LINE  NUMBERING   the  SM-KIT  automatically  numbers  BASIC  statements  until  you 

turn  the  function  off. 

SCREEN  OUTPUT,  the  commands  FIND,  DUMP.  TRACE  and  DIRECTORY  display  on 

the  CRT  while  you  hold  the  RETURN  key  (display  pauses  when  the  key  is  released). 

Continuous  output  is  selected  with  shift-lock 

OUTPUT  CONTROL  to  DISK  or  PRINTER,  in  addition  (o  displaying  on  the  CRT,  you  can 

direct  output  to  either  disk  or  printer. 

HARDCOPY  allows  screen  displays  (o  be  either  printed  or  stored  on  disk. 

FIND  searches  all  or  any  pan  of  a  program  for  text  or  command  strings  or  vanable 

names  Either  exact  search  or  wild  card  search  supported. 

RENUMBER   the  SM-KIT  can  renumlwr  all  or  any  part  of  a  program  The  selective 

renumbering  allows  you  to  move  blocks  of  code  within  your  program. 

VARIABLE  DUMP  displays  the  contents  of  floating  point,  integer,  and  string  variables 

(both  simple  and  array).  Can  display  all  variables  or  any  selected  variables 

TRACE   SM-KIT  can  trace  program  execution  either  continuously  or  step  by  step 

starling  with  any  line  number.  Selected  program  variables  can  be  displayed  while 

tracing, 

DISK  COMMANDS  as  in  DOS  Support(Universal  Wedge),  the  "sliorthand"  versions  of 

disk  commands  may  be  used  for  displaying  disk  directory,  initializing,  copying, 

scratching  files,  load  and  run.  etc 

LOAD   SM-KIT  can  load  all  or  part  of  BASIC  or  machine  language  programs.  It  can 

append  to  a  program  m  memory,  overwnte  any  part  of  a  program,  load  starting  with  any 

absolute  memory  location,  and  load  without  changing  variable  pointers. 

MERGE    allows  merging  all  or  any  part  of  a  program  on  disk  with  a  program  in  memory 

SAVE  and  VERIFY  SM-KIT  provides  one  step  program  save  and  verification.  It  also 

allows  you  to  save  any  part  of  a  program,  or  any  address  range. 


SM-KIT 

for  Commodore  Computers 
A  Programming  Productivity  Tool 


ONLY 
$40 


A  4K  ROM  with  both 
programming  and  disk 
handling  aids. 


Developed  by  (and  available  in  Europe  from)  SM  Softwareverbund-Mlcrocomputer  GrTibH,  Scfierbaumstrasse  29,  8000  Munchen  83,  Germany 


252  Bethlehem  Pike 
Colmar,  PA  18915 


21 5-822-7727 


A  B  Computers 


WRITE  FOR  CATALOG. 

Add  SI  25  per  order  lor  snipping  We  pay  baianceol  UPS  surface  chatges 
on  all  prepaid  orders  Puces  lislea  3ie  on  cash  discount  basis  Regul* 
piices  siigtitiy  hiflhei 


wabash 

When  it  comes  to 

Flexible  Disks,  nobody 

does  it  better  than 

Wabash. 

MasterCard.  Visa  Accepted. 
Call  Free:  (800)235-4137 


FREE  your  keyboard— interact  directly  with  the 
screen.  Why  waste  time  typing?  Use  a  3-G  Light  Pen. 


"Mail  Cojpon  ol  Call  Today  for  Imrnediale  Deliv&ry" 


^ 


3-G  Company,  Inc.  Dopi.  c  p 

Rt,  3,  Box  28A,  Gaston,  OR  97119 

(503)  662-4492 


Remember,  3-G  otters  a  30-Day 

Unconditional  Money  Back 

GUARANTEE 


:  :  TBS-SO  Economy 
$24.95 


:  TfiS-8Q  Piolessional      3  PET  Pfolessional 
S39.95  S37.95 


'.  Apple  Prolessional 
$3S.9i 


_3-G 


Yes,  I  wan!  to  make  mycomputer  more  versatile.  Rush  me 

Ligtit    Pens.    (Add    St. 50   tot   mailing    and    handling— $6.00   loreign.l 

Enclosed  is:         check  Of  money  order  MasterCharge  Visa 


Card  No. 
NAMF 

Exp,  Date 

A[3I>RESS 

niTV 

STATF 

ZIP 

......w. 

in  his  business  Al  Zenker  of  Zenker  Denial  laDs  m  Penndel   Pennsylvania  uses  our  pens  lor 

dala  tntrv-  Larry  Goaflmar  ot  Lowell  Wassacnuseirs uses  ihe qer^  to  selec)  leiephone  numberi 

!o  Ce  flifliea  Dy  hisconiDotET  Tnorw^id  tsbensenot  MiCfO  Ed  inc  jn  Minneapolis.  Minnesota 

wines  flducalion  soltware  !or  the3'6  iighi  Pen  Dr  Ricnaid  Kerns  of  EasT  Carolina  Universiiy 

mcofporaies  out  pen  m  a  demorsiralion  miti  a  voice  s^nihesirei  To  teach  fiis  aiuoenis  how  lo 

use  computet s 

These  p&ople  have  discoveceiJ  the  benelils 

of  using  a  3G  LigPl  Pen  Woulfln  I  a  3  G 

Lighl  fen  make  yotii  sysiem  more  versatile 

and  mote  luncji'oral?  Yes.  ot  ctujise  il 

would' 

Ogn't  Watl-'order  your  pen  loday  and 

receive 

1)  3-G  Light  Pen 

2)  Detnopislration  casseltes  |wi!h 
Protessional  TRS-8D,  PET  and 
Apple) 

3)  Sample  progranii  listing 
A}  Cctnplele  docu  menial  ion  and 

inslruclions  so  you  cfln  write 
your  own  program  m  BASIC 
5)  Otr\er  Light  Pen  software  and 
games  available 


NO  ASSEMBLY  KECESSARY.  READY  TO 
PLUGIH  AND  USE 
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National  Climatic  Center,  Federal  Building,  Ashe- 
ville,  NC  2880 1 .  The  concepts  of  the  Cooling  and 
Heating  degree  days  have  shown  excellent  correla- 
tion with  fuel  use  in  the  author's  residence  (see 
figure  1  and  2)  both  in  heating  and  air  conditioning, 
on  a  month  by  month  basis  and  an  even  higher 
correlation  for  an  entire  season.  This  correlation 
prompted  the  author  to  develop  a  BASIC  program 


The  programs  can 

evaluate  efficiency  from 

the  year  1974,  through  and 

including  1980. 


for  calculating  an  energy  usage  rate  in  one  year 
and  predicting  energy  usage  in  the  following  years 
based  on  degree  days.  Using  this  techniqtie,  energy 
fuel  savings  as  well  as  economic  savings  can  be 
calculated  even  though  the  weather,  energy  cost, 
and  energy  efficiency  of  the  home  are  changing 
month  by  month  and  year  by  year. 

Two  programs  were  written  for  the  OSI-4PMF 
in  "plain  Jane"  BASIC  so  as  to  be  easily  converted 
to  other  machines.  Each  program  requires  less 
than  8K  and  can  be  shortened  considerably  by 
selectively  eliminating  data  statements  to  restrict 
the  geographical  coverage.  Each  prograin  requires 
the  homeowner  to  have  records  of  fuel  use  and 
cost  for  two  years  or  more.  The  programs  can 
evaluate  efficiency  from  the  years  1974,  through 


and  including  1980.  Any  type  of  fuel  can  be  utilized, 
just  remember  that  the  units  you  input  will  be  the 
units  calculated  for  the  fuel  savings.  Likewise  the 
rate  is  given  as  cost^fuel  units,  and  so  is  dependent 
upon  the  units  you  input.  Changing  fuels  or 
changing  residences  invalidates  the  technique.  The 
heating  season  is  from  October  I  to  Mav  1  and  the 
cooling  season  is  from  April  I  to  November  I  and 
are  made  extra  long  in  order  to  accomodate  the 
wide  range  of  climates  in  the  United  States.  Because 
many  fuels  are  used  for  other  pinposes  such  as  hot 
water  heating,  home  lighting,  etc.,  the  offseason 
minimum  usage  is  used  to  remove  these  factors 
from  the  seasonal  weather  effects.  Thus  the  heating 
program  requests  the  July  fuel  u.se  and  the  cooling 
program  requests  the  January  fuel  use.  Should  a 
user  live  between  the  cities,  listed  rims  for  all  cities 
in  that  region  will  allow  interpolation.  The  following 
are  some  key  variables: 

ST$  =  state 

CT$  ==  city 

H(1,I)  =  degree  days  for  1974  for  city  I 

X  —  fuel  use/degree  days  for  base  year 

H  =  predicted  fuel  use  minus  actual  fuel  used 

RATE(k)  =  cost/fuel  unit 

F(k)  =  fuel  unit 

D(k)  =  cost 

k=  year 

MI  =  fuel  use  in  minimum  month 

The  precision  of  this  technique  is  good,  but  may 
predict  small  savings  or  loss  in  years  when  no 
energy  conservation  practices  were  in  effect.  This 
uncertainty  is  due  to  the  vaiiance  between  day  and 
night  temperatures  which  is  not  always  well  repre- 
sented by  the  mean  temperature  for  the  day. 
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Figure  2.  Cooling  Degree  Days  by  Month  for  1979 
in  Houston,  TX  and  Kilowatt  Hours  used 
in  the  Author's  Residence 
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Why  would  anyone  spend  $59.95  for  a  joystick? 


star  Wars,  Played  with  paddles,  its  difficult 
at  best  and  frustrating  at  worst.  But  witti 
a  joystick  it  becomes  an  entirely  new 
experience.  It's  still  challenging.  It's  also 
fun.  And  very  addictive. 

Have  you  ever  used  a  drawing  program 
in  which  one  paddle  controls  the  horizontal 
movement  of  the  "brush  '  and  the  other 
paddle  the  vertical?  It's  slow,  tedious  work. 
But  with  a  joystick,  drawing  is  an  absolute 
joy. 

Exceptional  Precision 

The  Apple  high-resolution  screen  is  divided 
into  a  matrix  of  160  by  280  pixels.  To  do 
precise  work  on  this  screen,  you  need  a 
precise  device.  Most  potentiometers  used 
in  paddle  controls  are  not  quite  linear.  If 
you  rotate  a  paddle  control  at  a  constant 
speed,  you'll  notice  that  the  cursor  speeds 
up  slightly  at  the  beginning  and  end  of  the 
paddle  rotation. 

The  Super  Joystick  has  a  pure  resistive 
circuit  which  is  absolutely  linear  within  one 
tenth  of  one  percent.  In  other  words  it  would 
give  you  precise  control  over  an  image  of 
1000  by  1000  pixels,  were  such  resolution 
available.  Thus  it  is  suitable  for  high  precision 
professional  applications  as  well  as  educa- 
tional and  hobbyist  ones. 

Matched  to  your  application 

The  Super  Joystick  also  has  two  external 
trim  adjustments,  one  for  each  direction. 
This  allows  you  to  perfectly  match  the  unit 
to  your  application  and  computer.  Say  you 
want  to  work  in  a  square  area  instead  of  the 
rectangularscreen.Just  reduce  the  horizontal 
size  with  the  trim  control. 

How  many  times  have  you  played  Space 
Invader  and  had  your  thumb  ache  for  hours 
from  the  repeated  button  pressing?  This 
won't  happen  with  the  Super  Joystick.  It's 
two  pushbuttons  are  big.  Moreover,  they 
use  massive  contact  surfaces  with  a  life  of 
well  over  1 .000,000  contacts.  A  few  games 
o1  Super  Invader  using  these  big  buttons 
will  justify  the  purchase  of  the  Super  Joy- 
stick. 

The  Super  Joystick  is  self-centering  in 
both  directions.  That  means  when  you  take 
yourhand  off  it,  the  control  will  return  to  the 
center.  However,  if  you  wan!  it  to  stay  where 
you  leave  it,  self-centering  may  be  easily 
disabled. 

The  Super  Joystick  plugs  right  into  the 
paddle  control  socket  and  doesn't  require 
an  I/O  slot. 


Super 
Joystick 


High-quality  construction 

The  sturdy  metal  case  of  the  Super  Joystick 
matches  that  of  the  Apple  computer.  Every 
component  used  is  the  very  highest  quality 
available.  The  Super  Joystick  even  uses  a 
full  16-conductor  ribbon  cable  so  you  can 
add  a  second  joystick  if  you  wish.  The  first 
Super  Joystick  replaces  Paddles  0  and  1. 
You  may  not  realize  it,  but  the  Apple  can 
support  four  paddle  controls.  A  second  Super 
Joystick  would  replace  Paddles  2  and  3. 


By  removing  two  springs,  self-centering 
can  be  defeated. 

We  invite  your  comparison  of  the  Super 
Joystick  with  any  other  unit  available.  Order 
it  and  use  it  for  30  days.  If  you're  not 
completely  satisfied,  return  it  for  a  prompt 
and  courteous  refund  plus  your  return 
postage.  You  can't  lose. 

The  Super  Joystick  consists  of  a  self- 
centering  ,  linear  joystick,  two  trim  controls, 
and  two  pushbuttons  mounted  in  an  attractive 
case.  Itcomes  complete  with  an  instruction 
booklet  and  90-day  limited  warranty.  Cost 
isS59,95. 

Order  Today 

To  order  the  Super  Joystick  send  $59.95 
plus  S2.00  postage  and  handling  (NJ 
residents  add  S3. 00  sales  tax)  to  our  address 
below. 

Experience  the  joys  of  using  the  world's 
finest  joystick  Order  your  Super  Joystick 
at  no  obligation  today. 

39  East  Hanover  Ave. 
Morris  Plains,  NJ  07950 
Toll-free  800-631 -81 12 

(InNJ  201-540-0445) 


Super 
Poddle 

Are  the  padd  le  controllers  on  your  Apple 
wearing  out?  Or  did  you  get  a  new  Apple 
without  paddles? 

We've  got  good  news  for  you!  Super 
Paddles.  Each  paddle  control  consists  of  a 
high-precision  linear  potentiometer  and  a 
big  (1/2"  D)  industrial-quality  pushbutton 
mounted  in  a  sturdy  4  "  x  2"  x  1 "  metal  case 
which  matches  the  Apple.  Each  of  the  two 
paddles  is  connected  with  a  long  5-foot  cable 
to  the  Apple  paddle  socket. 

Every  component  in  a  set  of  Super  Paddles 
is  the  very  finest  quality  available.  Ttie  set  is 
backed  by  a  90-day  limited  warranty  from 
the  manufacturer  as  well  as  Peripherals  Plus' 
moneyback  guarantee  of  satisfaction. 

To  order,  send  $39,95  plus  S2.00  postage 
and  handling  (NJ  residentsadd  $2.00 sales 
tax)  to  the  address  below.  Credit  card 
customers  may  call  orders  to  our  loll-free 
number. 

39  East  Hanover  Ave. 
Morris  Plains,  NJ  07950 
Toll-free  800-631 -81 12 

,  (InNJ  201-540-0445) 


FREE 
48-Page 
Catalog 


A  new,  free  48-page  catalog  is  free 
from  Creative  Computing  and  Periph- 
erals Plus.  To  help  buyers  make  mtelli- 
gent  purchasing  decisions,  the  product 
descriptions  are  exceptionally  compre- 
hensive and  include  screen  photos  in  the 
software  section 

The  catalog  describes  20  books  on  pro- 
gramming, games,  and  educational  appli- 
cations; 160  software  packages  for 
Apple,  Atari.  TRS-80,  PET,  CP/M,  Tl,  Sor- 
cerer and  Sol  computers;  3  magazines 
{Creative  Computing.  Microsystems,  and 
SYNC);  5  graphicsand  music  peripherals; 
an  LP  record;  board  game;  8  T-shirts  and 
an  eclectic  assortment  of  other  products 
for  the  personal  computer  user. 

To  get  your  free  copy,  simply  drop  a 
card  or  note  to  the  address  below. 

creative  coirRpatiR^ 

Attn:  Donna 

39  East  Hanover  Avenue 
Morris  Plains,  NJ  07960 


46 


COMPUTil 


July,  1981.  Issue  14 


RUN 


YEAR  BY  YEAR  COOLING  CONSERUATION  AUDIT 


STATE  (DON'T  AEiBREliIATE)  ?  TEXAS 

THE  SUMMER  Or  197^  IS  CALLED  7^,  CHOICES  ARE  7'\    TO  80 

STARTING  YEAR?  78  ' 

LAST  YEAR?  80  ■  | 

CHOICES  OF  INPUT  ARE  BY  YEAR  OR  MONTH  \ 

E'.Y  YEAR  (Y  OR  N)?  Y 

UNITS  OF  FUEL  CAN  BE  ANYTHING;  GALLONS,  KWH,  CUFT,  lOOCUFT 
ALL  FUEL  ENTRIES  MUST  BE  THE  SAME  UNITS 


YEAR=   78 

FUEL  USE  FOR  APR  1  TO  NOU  1?  10^22 

COST(DOLLARS)?  37^.28 

YEAR-   79 

FUEL  USE  FOR  APR  1  TO  NO^^  1?  9^83 

CGST(DOLLARS)?  -102.56 

YEAR=   80 

FUEL  USE  FOR  APR  1  TO  NOV  1?  1020^ 

COST(DOLLARS)?  528.08 


FUEL  USE  FOR  JANUARY? 

679 

STATE 

CITY 

1    TEXAS 

EiROWNGVILLE 

i 

2    TEXAS 

AMARILLO 

3    TEXAS 

FORT  WORTH 

^    TEXAS 

HOUSTON 

CHOOSE  *  OF  CITY?  ^ 

- 

1 

CHOSEN  CITY=  HOUSTON 

RATEdST 

YEAR)= 

YEAR        RATE 

FUEL  SAVINGS 

SAVINGS(DOLLARS) 

79         .0^ 

367.35 

15 

59 

to          *05 

73^.26 

37 

99 

.03 


_1_ 
2 

3 


(  + 


TEXAS 
TEXAS 
TEXAS_ 
"TEXAS 


SAVINGS) (-  = 
BR^O'WNSViLLE^ 
AMARILL0_1 
FORT  WORThL^ 
HOUSTON 


LOSS) 


CHOOSE  *  OF  CITY? 


OK 
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1,000,000  Bytes 


PET/BETA-1 


If  your  data  and  program  handling  requirements  are 
minima),  a  mini-disk  may  be  for  you.  It  you  want  to  access 
large  amounts  o(  data,  program  libraries,  flexible  user- 
defined  data  formating,  and  easy  to  understand  documen- 
tation. CONSIDER  the  PET'  BETA-f. 

The  PET  .■  BETA-1  is  a  fast  digital  tape  system  incorporating 
the  BETA-1  drive,  with  a  flexible  user-onented  operating 
system.  The  double-density  drive  has  high-speed  random 
access  to  over  1  million  bytes  per  digital  cassette  with  a 
transfer  rate  Of  1  K/second. 

PET/BETA-1  System 

Single  density  (512k,drive) 5600 

Double  density  (1  meg/drive)   5  800 


^1A^JUAL  laoci-caDle  to  pu^cnasel 


$10.00 


l-3ia-477-23«? 


New  PACKAGED  PROGRAMS 


CASCADE  COMPUTEHWARE  PRO- 
GRAMS are  designed  to  increase  your 
satisfaction  and  utilization  of  your 
Commodore  Computer.  Our 
professional  programmers  have 
created  new  programs  for  BLiSlf^ESS 
ENTERTAIN,f»1ENT,  EDUCATION,  and 
STATISTICAL  applications.  Write  for 
detailed  information: 

CASCADE  COIWPUTERWARE  CO.,  P.O.  BOX  2354,  EVERETT,  WA  98203 

£3ea/er  inquiries  invited  (206)  355-6t21 


Software  Specialists  ■  Science  and  Education 

t  MICROPHYS  APPLE 
p^;        PROGRAMS       O 

MIcrophys  is  pleased  to  announce  the  availability 
of  its  educational  software  for  use  with  the  Com- 
modore PET/CBM  and  APPLE/Bell  &  Howell 
microcomputers.  Over  180  programs  have  been 
successfully  employed  in  Chemistry,  Physics, 
Calculus,  Mathematics,  English  Vocabulary  and 
Spelling  classes  on  both  the  high  school  and 
college  levels. 

The  programs  are  supplied  on  C-10  cassettes  and 
are  accompanied  by  complete  instructions.  Each 
cassette  retails  for  $20  and  may  be  obtained  direc- 
tly from  Microphys, 

For  those  using  disk  drivers,  the  programs  have 
been  coherently  grouped  on  diskettes.  Educationally- 
oriented  word  game  programs  such  as  ANAGRAMS, 
WHEELS  OF  FORTUNE  and  CRYPTO,  are  also  avail- 
able 

Educators  are  invited  to  send  for  our  educational 
catalog  describing  over  180  programs  now 
available  for  use  on  the  PET/CBM  and  APPLE/Bell 
&  Howell  microsystems. 

MICROPHYS  PROGRAMS 

2048  Ford  Street  •  Brooklyn,  N.Y.  11229  U.S.A. 

(212)6460140 

U.K.  &  European  Dealer  Inquires  Welcomed! 


ECX  COMPUTER  CO. 

Specialists  in  Commodore  Equipment  And  Peripherals 
"**  NEW....NEW....NEW....NEW....NEW  "" 

•  MX-Z3Z  CBM/PETTO  RS-Z3ZC  IHTERF»CE: 

Low  cost,  bidirectional.  50  to  19,200  baud  rate,  full  modem  controls, 
parity,  allows  for  two  RS-232C  CBM  ports,  installs  easily  inside 
CBM:   $149.95 
'  SX-232.  CBM/PET  RS-Z3ZG  MODEM  SOFTWARE: 

For  above  CBM  to  RS-232C  interface  and  standard  RS-232C 
modem,  works  with  Source  MicronetCBtvl  to  disk  CBM  to 
CBM:   S49.95 

-  MX-910  CBM/PET  RAM/RDM: 

Allows  multi  ROM  protected  programs  using  !he  same  socket  to  be 
put  onto  diskette  cassette,  no  need  to  insert  protect  ROM  in  socket 
after  initial  load,  eliminates  need  for  ROM  switch  box.  write  protect 
in  software,  decoded  for  dual  ROM  socket  usage.  4K  expandable 
to  8K,  easy  internal  CBM  installation:  S1 19,95 

'CI  01 IEEE-U8/PET  TO  CENTRONICS  PARALLEL  INTERFACE: 

New  tow  cost,  includes  IEEE.488  and  Parallel  Cables,  works  on  all 
CBM  with  Spinwriters.  StanNriters.  etc.:  SI 29.95 

■MX-901  CBM/PET  CBZZOUHD: 

Low  cost  internal  CBM  sound  music,  makes  a  #2001  or  #4001 
sound  like  a  #8032:  $16,95 

-  MX-902  CBM/PET/VIC  CASSETTE  ZODND: 

Hear  programs  loading,  finds  the  program  easily,  internal 
sound:  $16,95 

■  SX-10I IEEE-4B8/PET  MODEM  SOFTWARE: 

BesI  8010  modem  software,  by  8010  developer,  all  features 
ofSX232:  S49,95 

■  MX-ZOO  gEEE-488/PET  PARITY  MODEM/SOFTWARE: 

Talk  10  a  host  computer  requiring  parity,  all  features  of 
3X232:  S399,9S 

•  CI  02  lEEE-MB/PET  WATAHABE  PLOTTER  IHTERFACE:      |SIM; 

For  fast  lEEE-48Bplotling:  S295.00 

ECX  COMPUTER  COMPANY 

2678  NORTH  MAIN  ST,  #6 

WALNUT  CREEK.  CA.  94596 

(415)944-9277 
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1  REM  COOLING  F-UEL  AUDIT 

2  REM  BY  DAVID  PITTS,  16011  STONEHAVEN  OR,  HOUSTON,  TX  77059 

10  REM 

11  REM  PROGRAM  REQUIRES  COOLING  FUEL  USE  (ANNUAL  OR  BY  MONTH) 

12  REM  COOLING  MONTHS  ARE  APRIL  1  TO  NOV  1 ,  2  YRS  OR  MORE  REQUIRED 

13  REM  OUTPUT  IS  FUEL  SAVINGS,  AND  *  SAVINGS 

15  REM  «**xx)«««)»:)K)k*«*****x)»:)kxx)K)k«***>kx)K)k«)K)k:»c)K)K)K«)»c)(<x)K)i<)k*)kx 

17  DEFFNTRC  (  E  )  =INT  <  E*  1  [)  0  )  /I  0  0 

20  PRINTTAB(12)  f'YEAR  BY  YEAR  COOLING  CONSERVATION  AUDIT" t PRINT : PRINT 

22  GOSUB500:iNPUT"STATE  (DON'T  ABBREVIATE) " JE* 

23  FORI=1T07:READM*(I) : next: PRINT 

25  PRINT-THE  SUMMER  OF  1974  IS  CALLED  74,  CHOICES  ARE  74  TO  80" 
27  print: INPUT"STARTING  YEAR" J YS : INPUT'TAST  YEAR" J  YE : PRINT 

30  L=:YE-YS+1:PRINT"CH0ICES  of  input  are  by  YEAR  OR  MONTH"IPRINT 

40  INPUT"BY  YEAR  (Y  OR  N)  "  J  A*:  IFASC  (  A<t )  089THEN1  0  0 

41  PRINT:PRINT"UNITS  of  fuel  CAN  BE  anything:  gallons,  KWH,  CUFT,  HIOCUFT" 
43  PRINT "ALL  FUEL  ENTRIES  MUST  BE  THE  SAME  UNITS" : GOSUBSO 0 ; PRINT 

47  F0RI=1T0L;PRINT"YEAR=  ";iNT(YS+I-l) 

48  PRINT"FUEL  USE  FOR  APR  I  TO  NOV  I " J  J INPUTF(I) t INPUT"COST(DOLLARS) " J D ( I) 
90  GOSUB500tNEXTJGOTO200 

100  fori=:itol:gosub50o;print"year  -  ";int(ys+i-i):forj=-ito7 

105  print"fuel  use  for  ";m$(J);:inputf:print"cost  for  "jm*(J): :inputd 

no  f(I)=f(I)+f:d(I)=d(I)+d:next:next 

200  input"fuel  use  for  JANUARY" ;mi:i=i 

220  READST* , CT* ( I ) , H (1 , I ) , H ( 2 , I ) , H ( 3 , I ) , H ( 4 , I ) , H ( 5 , I ) , H ( 6 , I ) , H ( 7 , T ) 
230  IFLEFT*  ( ST$  ,  7  )  =LEFT*  (  B$ ,  7  )  THENI==I+1 

240  IFST$=^"END"THEN250  !  , 

245  GOTO220 

250  j=I"1:ll=ys-74+i:printtab(15) ;"state";tab(25>;"city" 

255  F0RI=1T0J 

26  0  PRINTTAB(IO) J I JTAB ( 15) J B$ J  TAB ( 25 ) ;CT$(I) :N£XT 
270  INPUT"CH00SE  *  OF  CITY" } i: PRINT:G0SUB5Q 0 

280  X=  (  F  (  1  )  -7«MI )  /H  ( LL  ,  I )  t  RATE  (  1  )  ■--■D  ( 1 )  /F  ( 1 )  :  H-FNTRC  ( RATE  (  1 )  ) 

282  PRINT  "CHOSEN  CITY-  "  J  CT$  ( I)  ;  TAB  (  37  )  J  "RATE(  1ST  YEAR)  =="  f  TAB(  58  )  f  H 

2B5  PRINT:PRINTTAB(5)  r'YEAR"; 

290  PRINTTAB(16) :"RATE";TAB<25>  r'FUEL  SAVINGS" J TAB(42>  f "SAVINGS( DOLLARS ) " 

295  F0RK=2T0L 

30  0  H=^^H  <  LL+K-1  , 1 )  *X+7xMI-F  (  K  )  J  RATE  ( K  )  ^■-■D  (  K  )  /F  (  K  )  :  C=H>kRATE  (  K  > 

312  H==FNTRC(H)  :RATE(K)-FNTRC(RATE(K)  ):C-FNTRC(C) 

320  PRINTTAB(5);iNT(YS+K--l);TAB(15);RATE<K)rrAB(2e);H;TAB(42);C 

340  NEXT:PRINT:GOSUB500:PRINTTA&(20):"(+  -  savings)  (-•  -  LDSB)":G0T0255 

500  PRINT" __„ ^._ -RETURN 

1999  DATAAPRIL, MAY, JUNE, JULY, AUGUST, SEPTEMBER, OCTOBER 

20  0  0  DATATEXAS, BROWNSVILLE, 3871, 3857, 3327, 4 023, 4188, 3689, 3756 

2010  DATATEXAS, AMARILLO, 1396, 1235, 10 13, 170 0,1556, 1168, 1666 

2020  DATATEXAS, FORT  WORTH , 2578 , 2609 , 2251 , 30 17 , 2965 , 2509 , 3142 

20  30  DATATEXAS, HOUSTON, 2821, 2656, 2225, 2751, 2866, 2577, 3127 

2032  DATAALABAMA, BIRMINGHAM, 1640, 1858, 1427, 2272, 1975, 1719, 2177 

2  0  34  DATAALABAMA, MOBILE, 2548, 2732, 24 05, 2846, 2884, 2442, 268  0 

2  036  DATAALABAMA, MONTGOMERY, 1941, 2349, 1730, 2630, 2388, 2033, 2375 

2038  DATAARIZONA, FLAGSTAFF, 232, 88, 98, 191, 152,85,334 

20  40  DATAARIZONA , PHOENIX , 4285 , 3785 , 3965 , 452 1 , 4343 , 4186 , 3872 

2042  DATAARIZONA, TUCSON, 2788, 2592, 2760, 3099, 3184, 3052, 2844 

2044  DATAARKANSAS,LITTL£ROCK, 1787, 1941, 1602, 2266, 2358, 1926, 2486 

2046  DATACALIFORNIA,LOSANGELES,627,505,864,60  2,827,845,494 

2048  DATACALIFORNIA,SANFRANCISCO,127,80,192,88,144,ia2,102 

205Q  DATACOLORADO,DENVER,715,554,667,799,748,661,95  0 

2052  DATACONNECTICUTT, HARTFORD, 764, 87 0,819, 905, 657, 81 1,787 

2054  DATADELAWARE, WILMINGTON, 11 09, 11 01, 1003, 1120, 10 16, 990, 1333 

2056  DATAFLORIDA, JACKSONVILLE, 2460 ,2784,2179,2717,2559,2483,2647 
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3      This  Months  Product 
Specials  From 


Pool  1.5 

For  the  APPLE  II 

The  most  incredifaly  realistic 
'  pool  game  this  side  of  Hustlers 
Haven.  Choose  your  game,  aim  the  shot,  select 
the  speed  and  cue  ball  english.  If  you  miss,  a 
keystroke  will  set  up  the  position  to  try  again. 
One  to  four  players,  requires  paddles. 
Cat  No.  3110     APPLE  Il/or  II+, 

48k,  Disk  $34.95 

Missile  Command 

For  Atari  400  &  800 

Here  it  is!  The  long  awaited  computer  version  of 
the  hottest  arcade  game  in  town.  Defend  your 
cities  against  ever  increasing  numbers  of  ap- 
proaching enemy  missiles. 
Cat  No.  3091     Atari  400/800, 

16k,  ROM  Cart  $39.95 

Missile  Defense 

For  The  Apple  II 

On-Dne  Systems  makes  sure  you  Apple  II 
owners  won't  miss  out  on  the  fun.  Three  missile 
bases,  hi-res  graphics  and  a  terrifying  barrage  of 
enemy  missiles.  Uses  paddles,  joysticks  or 
keyboard  control. 

Cat  No.  3082    Apple  Il/or  II+. 

48k,  Disk  $29.95 

How  To  Order... 

Mention  this  ad  and  we  prepay  UPS  shipping  and  handling 
(ground  only).  Pay  by  check,  M/C.  Visa  or  COD.  COD's  add 
$1.40  extra.  Orders  musi  specify  this  ad  to  qualify.  Write  or 
phone  today. 

Send  For  Our  FKEE  HW  Catalogue 

Page  after  page  of  exciting  products  for  your 
personal  computer.  Call  or  write  to  us  today. 


ELECT7{ONICS 

[  Formerly  Kobbyv/orid  Elcclronicsl 

19511  Business  Center  Drive    Dcpt  G7 

Northridge,  Calif.  91324 

(ToU  FREE  oatside  CAUF.)(213)  886-9200 

(In  CAUF.)     (800)  423-5387 


By  Netronlc* 
ASCIIIBAUDOT, 
STAND  ALONE 

Computer 
Terminal 

COMPLETE 
FOR  ONLY  .  .  . 


$149 


95 


TheNciroma  ASCII/  BALI  tX>T  fTanpuIer  Tninin4l  Kili«  t 
mIcfOprocMior-conif oiled,  iiind  ilofu  fceybotid/inniiail 
icquiing  no  «:ompiitu  inemorr  oi  loftitirc.  It  allo«i  Ltic  uS^o! 
oihcT  a  64  or  32  thirtiier  by  1 6  line  prorciikwal  diipUy  for- 
IJHI  wiih  wJeaable  baud  lale,  RSUZ-C  t>f  20  mi.  OHipui.  Full 
■ainot  corwrol  Mwi  "!  ohm  compcMiic  video  outpuL. 

Thr  kr)boaJd  f&llo*!  iht  lUndArd  i>pc«nicr  con fifu ration 
nrvdgcnerzLn  ihccirtirt  128  eh»f4CT*r  ASCII  b:ipfr/lo*cr  a« 
i«  *ilh  96  print*Hr  chsriUcii,.  Fdlurn  includ*  onboard 
i(f.ulitcri,  ulmibk  pariiy,  thift  lock  Ley,  ft!ph«  lock  jumfKr, 

■  drjve  cApabiliiy  dT  dew  TTY  lud,  arul  Ihc  ability  lo  mllf 
directly  »([li  alm&M  sny  compuw,  incJudina  ihr  nc*  E: 
pli»n/BJ  and  ELF  prodjcl»  by  Ndfonic^- 

The  Computer  Teirninal  rcquirci  HO  I/O  mirpm*  "f^t 
incljdn  Ik  ot  memory,  chancier  lencralo^r,  2  kfy  fnilover, 
prKWtor  cOJitrollfdcufwr  con[rolf  paiallei  ASCII/ BAUDOT 
10  itt\a\  oon^'cfiioi  and  wriai  to  video  prtxcising— fully 
cryitil  conlrolkd  fot  iuperb  atiutiiy.  PC  boaidi  arc  the 
hJfthMi  quality  gla^  cpoxy  (or  ihe  uilimale  ifi  reliatsiliiy  and 
long  IJFf. 

VIDIO  DISPLAY  SPiCIPICATIOHS 

Ttx  hran  of  ihe  Neironin  Computer  Trrmintl  il  lh«  micro- 
p(«««>f«inK0ll«!  Nflffjnics  Video  Diiplaj  Board  |V|D| 
»  hich  allo*t  ihe  terniinll  10  uliluc  ei[h<r  a  parilld  ASCII  oj 
BAU[M:>T  liins!  yxvtcc.  The  VID  con^eru  ibc  P«ialki  dan  to 
MTial  data  which  ii  ihcn  ftwwiilled  lo  either  RS2J2'C  Of  ZOma 
(uriH^t  loop  miipui.  «tiich  can  be  connected  la  Ihe  ktuI  VO 
OR  jOuf  oumpultt  cnr  other  tmeiface.  i  c.  Modem. 

When  connected  lo  a  tcngpLltF.  iht  compuier  muu  echo  the  I 
chaiancr  received.  Thii  data  iv  retei^cd  by  ihe  V|D  *liich, 
procerus  the  infonnaiioni,  fonvertini  ta  data  lo  video  ^niiablej 
to  be  dilplai*d  Ol  l  T^'  set  iaunt  an  RF  modyUior)  at  on  ai 
video  monitor.  The  VID  Ecneraie-i  the  cuisot,  horizontal  and| 
vcriica]  sync  pulsn  ind  perfoimv  ihe  houwkKping  letative  in 
which  cbaracier  and  where  ii  ii  to  be  displayed  on  iht  Kieen. 
Video  Ouiput:  1.3  P/P  info  7!  t,fim  ^fM  RS-t70i  -  Baud  Rile: 
IIQ  and  JOO  ASCII  -  Chiiputi:  /iS2i2-C  Pf  10  mO-  (umtf!  loop 

■  ASC'M  Chancier  S«t:  128  ptintttMe  rtiaractrrs— 


ASCn/BAUDOT 
Computer  Terminal  Kit 

bAVDO^CkmeUTfietTA'SCIieFGtilJKl'irN'O'PQ 
ft  STUy  \*'X  Y7.  ?:  *iitf)..90U  !i7;l/68* 
Ccnof  Model:  Homr,  Batkspacr,  Horiionlal  Tab,  Lmffnd, 
y*fU(t}i  Ttb.  Cafiatt  RtHH".  7""U  iptcial  mnor  xqvtKcrs 
are  provtdrd  for  ataolule  and  rriativr  X-Y  curzar  addrrsvng  * 
Cnnor  C«alrDJ:  Erax,  End  of  Lint.  Erase  aj  ^reen.  Form 
Ftid.  Ptiat  •  MoalMw  Opmriaa;  30  or  60Hz  fjuttpt* 
xiniablf. 

CALL  TOLL  FREE  800-243-7428 

,^^  ^  To  Order  From  Conwclicul  0:  f  of  Technml  ^  ^ 
r  Assislancfl.  Elc  Cil  (HQ)  354-9375  W 

iiSti-lranlca  RAD  Lid.,  [)«p4. 
3M  LllchrkW  Road,  New  Miirord,  CT  06T76 
I  Pteajt  ienti  the  ilerm  checkrd  Mow — 

10  Neu-anln  Siand  Alone  AliCIl  Kej board/ Cnmpu»r 
TemHil  Kit.  5149.95  plj{S3.00p<KiaKei  handliiij. 
■  D  Ddiiae  SIrd  Cafainci  foi  Nelronics  Key  board/Term  i- 
il  In  niLic/Black  Finiih.  Sif.M  plu;  (2.50  poMace 


ind  :^jfdljrig. 


I  G   Vidn  bbp4ay  Boan)  lUt  akvic  tku  keyboard),  fH.H 

_        plu^  13  [sMiaie  k  handhni. 

I  G  12"  VUteM^ajiof  iiOMHjba!id*idih)f(iU>»u(tn' 

ibked  and  leiled.  SI39.9S  plu^  ii  poMafe  arid  htndhni. 
n  RF  Modahior  Kit  |io  utc  iou:  TV  Kt  for  a  monitoir, 
U.91  poirpaid . 
a  5  inp  Po»*f  Sappt}  Ui  In  Dfluie  SikI  Cabinei 
I  (  -  SVDC  e  i  «mpt.  p\Mi  t-ft  VACI.  U9.95  plu»  SZ 
I         posujc  &  handling. 

i  Total  Encrlosed  (Conn.  le*.  add  ialei  las)  5 
By- 

Ia   Personal  Check           Q  C«himCli«fc/Honey  Order 
a   Vka  □  MB>rerChirieCBankt_.^ | 

I  Acci.  • . 


aBTSt6uKvtIHe3« 


T*|/|W* 


!■•*«'()*+,-. /Ol23456789i;<=>? 
«ecCeFWIJKUIOPQRSTU»fVZ[M*. 


Prim 
I  Name  _ 

a  Addceu 


r"' 

Jsiaic i^ip    

k^^    G  ^r1rf  M*  Man  Urof 


"^^^J 


NEW!!!-THE  ELECTRIC  MOUTH 

forS!00,Eiril,A[)pli!, 
TRS-80  Level  II 

From  ivlJII<tJ<)  kll 

Now  —  fear/i  your  com- 
puter lo  talk,  dramiih"r;a/lv 
increasing  the  interaction 
between  you  and  your 
machine. 

Thai's  right:  Ihe  ELECTRIC  MOUTH  ac-  Principle  ttt Opnralion  The  ELECTRIC 
luaUy  lets  your  computer  tflll<!  Installed  and  MOUTH  stores  words  in  their  digital 
on-line  in  just  minutps.  it's  ready  tor  sjtoken.  equivalenls  in  ROMs.  When  words,  phrases, 
language  use  in  otfir.e,  business,  mdustrial  and  plioncme!^  are  desired,  they  are  simply 
ana  cnmmercinl  opplicatirms,  in  games,  called  lor  by  your  prograot  and  then  syn- 
special  projects,  RtiD.  education,  security  theslzod  into  speech.  The  ELECTHU; 
devices  —  (here's  no  end  to  the  ELECTRIC  MOIJTII  system  requires  none  of  your 
MOUTH'S  usetulncss.  Looit  at  these  fea-  valuable  memory-  space  except  (or  a  tew  ad- 
tures;  dresses  if  used  in  memory  mapped  mode.  In 

'  Supplied  ivilti  1*3  rtrtHk  v««v  pliarvMnM  num-       most  cases,  oulpul  ports  (us^r  scleclahte)  are 
b«rs,upableDlptTMJucinKliundrrdsnf  wont^and         used. 


Spoken  Malerlal  Included 


iMvraii 

li.i^'i 

ntwi 

[>AN{.l]t 

IJ^xs 

DK;iu.r. 

i£-'^^M 

AnrK 

fKilJAH 

ijun 

fn-K 

HtlWN 

SIX 

Mfiujam 

KgiiAI. 

NDWEK 

W^HK 

ML-reH 

SBCi  *\n 

AMP^jiO! 

FlJlVi- 

Miu: 

StL- 

■i>:n 

rtNtl 

nni. 

MlliJ 

rivuk: 

MIMLS 

SPEEO 

V.Mil.H. 

(Ml 

lli:ii5T.KS 

CRAM 

ISEAK 

SrABT 

S 

NliMHQI 

nt-'rKJ  \ 

:Hi7.TttSi 

CKEAt^H 

(IFF 

T>1E 

.i"-)--.lll\C  1 

IIKili 

os; 

iiMssi;;-.!  1 

ll«.HhM 

H01IH 

CJVfJC 

i,„M-.s[lJM  . 

HMO-xm>?rfS 

VdLT 

iH:mi^ 

■  ■^■'■I'.StlM.i 

iMiirci 

ttlMlh^t-t 

njkiT 

1  Kvn 

HiATi. 

nmf 

(JIFllK 

II 

tli'S 

MXl1t 

(:i)»u\ 

K1U» 

lOllMI 

A]v. 

Ih 

^L..nirti't.-.L:r.l- 

.tln^    ^fl.k 

i-nlfT-if  li%  ]■ 

l.f 

phra 

*  F\p4nd4ble  on-bo«d  up  to  ihtiu-kand.^  dT  Hords 
itnd  phra^m  |juM  add  addiliiinal  sf»-n  h  KUMs  «> 
ihi^y  brrnrnf  available!. 

*  FoM.rmt)drh  Tkhii  hijlu|[din-(.iK  inlnSJflO,  .Apple. 
Kll  II  4rtd  TH&-eo  U^  rl  II  «irtit>Ut>-i^ 

*  (irl  il  lo  lalL  In  usin^  filhrr  IIbmi:  iu  machinf 
lanruaKF  jvm  pmv  lo  um-.  (.(jmpliir  U3:<truc]ions 
Hitll  examples  in tiLdnll. 

'  UsofinVaiiohi!  SemiconduC-Kir  n  "[liHJlailtcr" 

!iyslem. 
'  Includes  on-board  audio  amplifim  .and  spiraker. 

with  provisinns  Inr  rxtcinul  speukcrs  and 

iimpiirief. 

*  .\dids  a  npw  cjimen^n  and  cMili'mi^l  to  prrt- 
j{ramniinR:  Ie1^y[>u  modiK  rviilinfl  prvKramhaiKl 
ttamtrs  lo  add  ^^xfken  annnuntrmenl^  ill  rr^ulls. 
Mamingi.  Mr. 

*  Irutalb  in  jusJ  mioiulc^ 
FJ(Il""i»il"ThrtJiTlw  .Vlpiiilh"(iWffT«.m»*-nHirKs<.f 

\Vtf.jrlii;^ll^l)/.t.f     Afflfc-'ii-iinsl   llflJ(llTHJ*»f;^(lpk- 
!  •<.\rf%:i>-,  in-.  '  TltS-«P  lj-ivl  11'    h  ii  n-j,.  Fn>i™<irA  >•! 

■  ■'■■■■■■■■■■■■■■■«■■■■■«■■■    ■■■■■•«■■•»*■■■■■■■■■■■■■■■■  *1* 

;tontlneiilBltJ.S.*.CrcdUCflr(lBuycrsOuisJ  lie  Conn.  TO  ORDER  CALL  TOLL  FREE  80O*243-742BJ 
J  To  Order  From  ConnECHmi  Or  for Tpchnical  fl^sJslftncr.  F.ic  Cail  1 203 1  354-9375  J 

;  fprsonalChRck        '  riishlifsCtiPckMDney Order  J 

G  VlH       L-  MBMi^rlhaiC'lBankNo \  , 

Acci.  No __^^ ■  J 


■NETKONICSR&ll  LTIl.  tkpt. 

■  J]]  UtchliHd  Koad,  Nrw  Hlllbril.lTr  UT7e 


I      l-r-T 


ItJtJll-lJt'l 


■.rhirUnShhn 


■  _;  >iiBa-TiKiniMui[D'  Lm  .... 

■  .  iJlirElenncvihidi'kti 

■  .  TU.«lLeielil'DeelilcKHn 


!kig  nature- 
Prim 


..  txp.  Dile— 


CJiy 


Zip. 
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20  58  DATAFLORIDA,  MIAMI, -4657, -=157  0,^0 1^,^202,^:1 83,  ^21 8,  CH86 
20  6  0  DATAFLORIDA,  TALLAHASSEE,  2^72,  260  ^,2292,  2^98,  2^80,  2198,  2'^S8 
2  0  62  DATAGEORGIA, ATLANTA, 1506, 160 0,1254, 1735, 1773, 1762, 2370 
2  0  64  DATAGEORGIA ,  SAi,'ANNAH  ,  2289  ,  2574  ,  1954  ,  2643  ,  2570  ,  2390  ,  250 1 
2  0  66  DATAIDAHD, BOISE, 85 1,789, 535, 822, 597, 752, 511 
2  0  68  DATAIDAHG,POCATELLO,460,440,372,519,369,479,225 
2  070  DATAILLINOIS, CHICAGO, 77 0,1 124, 90 6, 1218, 982, 81 2, 929 
2072  DATAILLINOIS, SPRINGFIELD, 984, 120 0,1 021, 1369, 1253, 120 1,1452 
2074  DATAINDIANA,E^^ANS«v'ILLE,  1229, 150  0,1 112,  1779, 1550,  1238, 1672 
2076  DATAINDIANA,FORTWAYNE, 727, 833, 664, 1032,898,677,844 
2078  DATAINDIANA, INDIANAPOLIS, 850, 1046, 770, 1363, 130 0,882, 1142 
2080  DATAIQWA,DESMOINES, 974, 1237, 1050, 1342, 1226, 984, 1262 
I    DATAIOWA,SIQUXCITY, 980, 1013, 969, 862, 928, 865, 1071 


2084  DATAKANSAS,TOPEKA, 1173, 1474, 1294, 1563, 1434, 1275, 1810 

2086  DATAKANSAS, WICHITA, 1466, 1512, 1417, 1841, 2047, 1663, 2286 

2088  DATAKENTUCKY, LOUISVILLE, 1055, 150 6, 1130, 1717, 1539, 1236, 1676 

2090  DATALOUSIANA,BATONRaUGE, 2641, 2618, 2248, 2772, 2781, 2379, 2670 

2092  DATALOUSIANA,NEWDRLEANS, 2655, 2637, 239 0,2962, 30 59, 2895, 3030 

2094  DATAMAINE, CARIBOU, 116, 271, 231, 223, 264, 290, 211 

20  96  DATAMAINE, PORTLAND, 296, 351, 30 8, 308, 336, 316, 468 

20  98  DATAMARYLAND, BALTIMORE, 1038,1 245, 11 49, 1474, 1274, 1137, 1407 

210  0  DATAMASSACHUSETTS, BOSTON, 646, 862, 895, 897, 668, 789, 894 

210  2  DATAMICHIGAN, DETROIT, 620, 73 1,7 0  6, 873, 760, 522, 672 

210  4  DATAMICHIGAN, GRANDRAPIDS, 4 0  0, 619, 638, 714, 588, 6 14, 667 

2106  DATAMICHIGAN,SAULTST.MARIE, 126,243, 167,86, 125, 145,96 

2108  DATAMINNES0TA,DULUTH,149,229,271,122,224,169,241 

2110  DATAMINNESOTA, INT. FALLS, 259, 328, 281, 187, 219, 131, 327 

2112  DATAMINNESOT A, MINNEAPOLIS, 619, 85 0,950, 691, 81 1,65 1,776 

2114  DATAMISSISSIPPI, JACKSON, 2036, 230 0,1943, 2535, 2421, 1947, 2578 

2116  DATAMISSOURI,KANSASCITY, 1159, 1534, 1296, 1403, 1535, 1174, 1721 

2118  DATAMISSDURI, ST. LOUIS, 1175, 1431, 1229, 1667, 1519, 1578, 1907 

2120  DATAMISSOURI, SPRINGFIELD, 1095, 1349, 1085, 1692, 1565, 1122, 1850 

2122  DATAMONTANA, BILLINGS, 572, 478, 547, 545, 429, 716, 670 

2124  DATAMDNTANA,GREATFALLS,473,315,3S9,293,332,396,302 

2126  DATAMDNTANA , MISSOULA , 303 , 258 , 158 , 295 , 1 83 , 39  0 , 125 

2128  DATANEBRASKA, LINCOLN, 1128, 1282, 1178, 1250, 1175, 1098, 1532 

2130  DATANEBRASKA, OMAHA, 1021, 1389,1249, 1364, 1321, 11 24, 1374 

2132  DATANEVADA,LAS^;EGAS,  3403,  2973,  2809,  3332,  330  0,3387,  3035 

2134  DATANEMADA, RENO, 258, 348, 236, 50 0,340, 404, 40  0 

2136  DATANEW  HAMPSHIRE, CONCORD, 302, 553, 419, 488, 521, 519, 430 

2138  DATANEW  JERSEY , TRENTON, 977 , 1 070 , 1 053, 1 163 , 976 , 936 , 1288 

2140  DATANEW  MEXICO , ALBUQUERQUE, 1333 , 1 1 00 , 1 141 , 1335 , 1398 , 1508, 151^ 

142  DATANEW  MEXICO , ROSWELL , 1655 ,1437, 1786 , 2428 ,1991,1 684 ,2061 
2144  DATANEW  YORK , ALBANY, 386 , 597 , 476 , 574 , 436, 636 , 561 
146  DATANEW  YORK , NEWYORK , 1 0 17 , 953 , 1 158 , 1 097 , 919 , 1 049 , 1276 
148  DATANEW  YORK , SYRACUSE , 405 , 555 , 357 , 520 , 623 , 595 , 687 
1 5 0  DATANORTH  CAROLINA , ASHEVILLE , 731 , 795 , 545 ,10  07, 973 , 792 ,1166 
2152  DATANORTH  CAROLINA , RALEIGH , 1325 , 1452 , 1459, 170 1 , 1671 , 1275 , 1742 
2154  DATANORTH  CAROLINA , WILMNGTN , 1978 , 2373 , 1936 , 231 0 , 2097 , 1966 , 2230 
2156  DATANORTH  DAKOTA, FARGO ,444 ,553 , 766 , 487, 604 , 504 , 580 
2158  DATANORTH  DAKOTA , WILLISTGN , 440 , 376 , 507 , 41 0 , 421 , 415 , 60 0 
216  0  DATAOHIO, COLUMBUS, 836, 1147, 608, 1073, 968, BOB, 10 08 
2162  DATAOHIO, TOLEDO, 60 8, 692, 599, 784, 741, 60 2, 74  0 
2164  DATAOKLAHOMA,OKLACITY,1651,1615,170  2,2163,2418,180S,2479 


2166  DATAOREGON, BURNS, 406, 347, 227, 451, 277, 367, 106 
168  DATAOREGON, PORTLAND, 4 0  9, 342, 2 16, 375, 343, 462, 27  0 

2170  DATAPENNSYLVANIA,HARRISBURG,1163,1026,901,1053,1015,S28,1]83 

2172  DATAPENNSYLVANIA , PITTSBURG , 657 , 721 , 338 , 623 , 836 , 620 , 876 
174  DAT APENNSYLiJANIA  ,  PHILADELPHIA  ,1165,1 243 ,1211, 1237 ,  1247  ,1097,1 4 1  0 

2176  DATARHODE  ISLAND , PROVIDENCE , 666 , 694 , 631 , 821 , 61 0 , 640 , 789 
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2178  DATASDUTH  CAF<OLINA ,  CHARLESTON  »  20^^  ,  IMOS ,  1885  ,  258^  ,  2319  ,  220^  ,  2258 
2180  DATASOUTH  CAROLINA, GREENUILLE , 1435, 15^7 , 1 135 » 1958 , 1559 , 1296, 171 0 
2182  DATASDUTH  DAKDTA,Fv:APIDCITY,697,583,676,  574,  669,  550  ,665 
2184  DATASDUTH  DAKOTA , SIOUXFALLS , 751 ,91 0 , 1 040 , 854 , 743 , 724 ,793 
2186  DATATENNESSEE, CHATTANOOGA, 1058, 1365, 1165, 2095, 1847, 1432, 1778 
2188  DAT ATENNESSEE,KNOXVILLE, 1340, 1530, 1133, 18 11, 161 2, 1355, 1814 

219  0  DATATENNESSEE, MEMPHIS, 1840, 2 184, 180 0,2681, 2357, 20 88, 2683 
2192  DATAIJTAH,SALTLAKECITY,1191,90  0,943,1108,1018,1274,990 
2194  DATAVERMONT , BURLINGTON ,442 , 699 , 483 , 507 , 489 , 531 , 503 

2196  DATA^^IRGINIA,  NORFOLK,  153 1,1744, 1558,  1930,  1535, 1433,  1788 

2198  DATA»JIRGINIA,RICHMOND,  1259,  1433, 1385,  1814,  1573,  1375,  1681 

2200  DATAWASHINGTGN, SEATTLE, 196, 197, 129, 232, 210, 171, 57 

22  0  2  DAT AWASHINGTON, SPOKANE, 4 05, 340, 293, 472, 326, 496, 228 

22  0  4  DATAWEST  VIRGINIA , CHRLSTON , 91 0 , 1 074 , 801 , 1227 , 1 1 14 , 894, 1123 

220  6  DATAWISCGNSIN,GREENE;AY,323,514,520,534,440,380,451 
22  0  8  DAT AWISCONSIN, MADISON, 457, 742, 627, 622, 589, 45 0,63  0 
2210  DATAWYQMING, CHEYENNE, 349, 193,217,252,297,352,415 
2990  DATAWYGMING, LANDER, 467, 333, 394, 410, 408, 436, 423 
2995  DATAEND, END, 0,0, 0,0, 0,0,0 

30  0  0  END 


1  REM  HEATING  FUEL  AUDIT 

2  REM  BY  DAUID  PITTS,  16011  STONEHAVEN  DR.  HOUSTON,  TX  77059 

10  REM 

11  REM  PROGRAM  REQUIRES  HEATING  FUEL  USE (ANNUAL  OR  BY  MONTH) 

12  REM  HEATING  MONTHS  ARE  OCT  1  TO  MAY  1 ,  2  YRS  OR  MORE  REQUIRED 

13  REM  OUTPUT  IS  FUEL  SAVINGS,  AND  $  SAVINGS 

15  REM  xxxxJKXXx*^***************************)^*^*****:***** 

17  DEFFNTRC(E)=INT<E)K100)/10  0 

20  PRINTTAB(12) J"YEAR  BY  YEAR  HEATING  CONSERVATION  AUDIT" t PRINT! PRINT 

22  GOSUB500:iNPUT"STATE  (DON'T  ABBREVIATE) " f B* 

23  F0RI  =  1T07 : READM* (1)1  NEXT : PRINT 

25  PRINT"THE  WINTER  OF  1973-74  IS  CALLED  74,  CHOICES  ARE  74  TO  80" 

27  print:input"starting  year";ys:input"last  year"?ye:print 

30  L  =:ye-ys+i:print"ghgices  df  input  are  by  year  OR  month":print 

40  INPUT"&Y  year  (Y  or  N)"JA*:IFASC(A*)<>89THEN;L00 

41  PRINT :print"units  of  fuel  can  be  anything:  gallons,  KWH,  CUFT,  IOOCUFT" 

43  PRINT" ALL  FUEL  ENTRIES  MUST  BE  THE  SAME  UNITS" : GOSUB50  0 : PRINT 

47  F0RI=1T0LIPRINT"YEAR=-  "  J  INT  (  YS+I-1  ) 

48  PRINT"FUEL  USE  FOR  OCT  1  TO  MAY  1 " J t INPUTF (I) IINPUT"COST (DOLLARS) " J D ( I ) 
90  GOSUB50  0;NEXTtGGTO2  0  0 

100  FORI-1TOL:GOSUB500:PRINT"YEAR  =•■    ";iNT(YStI-l)  tF0RJ==:lT07 

105  PRINT-FUEL  USE  FOR  " J M* ( J) f t INPUTF : PRINT"C0BT  FOR  " ;M*( J) J ? INPUTD 

110  F  ( I )  =F  ( I )  +F  :  0  ( I )  :--=D  ( I )  +D  :  NEXT  t  NEXT 

200  INPUT"FUEL  USE  FOR  JULY"  J  Mi:  I^=^l 

220  READST1;,CT*(I),H(1,I)  ,H(2, 1)  ,H(  3, 1)  ,  H(  4  , 1)  ,  H  (  5  , 1 )  ,  H  (  6  , 1)  ,  H  (  7  , 1) 

230  IFLEFT$  (  ST$  ,  7  )  ^=LEFT*  (  B$  ,  7  )  THENI-If  1 

240  IFST$^"END"THEN250 

'^45  rOTO'^'2  0 

250  J--I-1:LL-YS--74  +  i:PRINTTAB(  15);  "STATE";  TAB  (25);  "CITY" 

255  FORI^^ITOJ 

260  printtab(io);i;ta&(15) ;B*;TAe(25) ;ct$(I) ;next 

270  INPUT"CH00SE  *  OF  CITY" ;i J  PRINT :GOSUB50 0 

28  0  X=  (  F  ( 1 )  -7*MI )  /H  (  LL  ,  I)  :  RATE  (  1  )  -D  ( 1 )  /F  ( 1 )  J  H=^FNTRC  ( RATE  ( 1 )  ) 

282  PRINT-CHOSEN  CITY=  "  ;  CT$  (I)  ;  TAB(  37  )  ;  "RATE(  1ST  YEAR)  =="  ;  TAB(  58)  ;  H 

285  PRINT :PRINTTAB(5) ;"YEAR"; 

290  PRINTTAB(16) ; "RATE" J TAB( 25 ) ;"FUEL  SAVINGS" ; TAB( 42) ; "SAVINGS( DOLLARS) " 

295  F0RK-^2T0L 

30  0  H-H  (  LL  +  K-- 1,1)  *X+7*MI~F  (  K  )  :  RATE  <  K )  =D  (  K  )  /F  (  K )  :  C=--H!kRATE  ( K ) 
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312  h=fntf;;c(h)  jrate(K)^:^fntfcc(rati;;:(K)  )  :c=^fntf;:c(C) 

32  0  F'RINTTAE:(5)  J  INK  YS+K  ~:L  )  fTABdl^)  J  RATE  (K)  J  TABC  28  )  J  H  J  TAB  (  ^2  )  JC 

340  next:print:gosubsoo:pri:ntta&(20)  ?"(+  -  bakings x -•  -'■■■■   ldbs)":guiu^d3 

50  0  PRINT" '■:  RETURN 

1 99V  DATAOCTOBER , NOVEMBER , DECEMBER , JANUARY , FEBRUARY , MARCH , APRIL 

20  0  0  DATATEXAS  t  BROWNSVILLE  ,  4 ;L &  ,  S20  ,518,974,800,  728  ,  640 

2010  DATATEXAS , AMARILLO , 3389 ,4163 , 3484 , 4515 , 4084 , 4540 , 4219 

2020  DATATEXAS, FORT  WORTH, 1854 , 2281 , 1841 , 2967 , 2941 , 2730 , 2375 

2030  DATATEXAS, HOUSTON, 1157, 1190, 1309, 2276, 21 03, 171 1,1545 

20  32  DATA ALABAMA , BIRMINGHAM , 2138 , 257 0 , 2527 , 3488 , 3295 , 2777 , 2766 

2  0  34  D AT AALABAMA, MOBILE, 10 37, 1365, 1393, 24 0  0, 22 0  6, 1617, 1608 

2  0  36  DATAALABAMA, MONTGOMERY, 1643, 1967, 21 19, 3 0  38, 24 0  3, 1987, 20 28 

2038  DATAARIZONA, FLAGSTAFF, 6080, 6740, 6158, 6032, 4882, 6813, 6100 

204  0  DATAARIZGNA, PHOENIX, 1093, 1558, 1089, 1071, 692, 1428, 1022 

2  0  42  DAT A ARIZONA, TUCSON, 1652, 2 183, 1453, 1644, 11 94, 184 0,1 349 

2  0  44  DATAARKANSAS , LITTLEROCK, 2645 , 3059, 2763 , 3590 , 3723 , 3528, 3142 

2046  DATACALIFQRNIA,LOSANGELES, 1232, 1305, 1160, 969, 705, 1452, 808 

2048  DATACALIFORNIA , SANFRANCISCO , 2752 ,2918, 2929 , 2594 , 1972 , 2774 ,2116 

2050  DATACOLORADO, DENVER, 5569, 5826, 51 17, 5258, 4882,5937, 5333 

DATACONNECTICUTT , HARTFORD , 5540 , 589  0 , 5349 ,6164, 571 1 , 6286 , 5569 

0  54  DATADELAWARE , WILMINGTON , 3910, 4676 , 4177 , 520 6 , 498 0 , 4883 , 4364 
2056  DATAFLORIDA, JACKSONVILLE, 933, 1168, 1390, 2061, 1791, 1525, 1406 
2  0  58  DATAFLORIDA, MIAMI, 131, 59, 202, 31 1,331, 185, 204 
2060  DATAFLORIDA, TALLAHASSEE, 11 06, 1547, 1594, 2 199, 2166, 1746, 1692 
20  62  DATAGEDRGIA , ATLANTA , 2305 , 2873 , 2697 , 3834 , 3298 , 2757 , 2737 
2064  DATAGEORGIA, SAVANNAH, 1274, 1537, 1735, 2527, 2253, 1751, 1881 
2066  DATAIDAHO , BOISE , 4977 , 531 8 , 5376 , 5715 . 4287 , 5984 , 4792 
2068  DATAIDAHO, POCATELLO, 6387, 6713, 6252, 6474, 51 03, 7190, 5839 
2070  DATAILLINOIS, CHICAGO, 5634, 6039, 5135, 6613, 6322, 6686, 5537 
20  72  DATAILLINOIS, SPRINGFIELD, 4998, 5433, 4693, 6157, 6057, 6075, 5308 

074  DATAINDIANA , EVANSVILLE , 3873 , 4424 , 3960 , 5236 ,5113, 4979 , 4676 
2076  DATAINDIANA, FORTWAYNE, 5660, 6093, 51 98, 6723, 6472, 6271, 6046 
2 0  78  DATAINDIANA , INDIANAPOLIS , 4698 , 5477 , 4762 , 6260 , 5698 , 5748 , 5484 
20  80  DATAIOWA,DESMOINES, 5908, 6468, 5268, 6418, 6606, 7041, 5827 
2082  DATAIOWA,SIOUXCITY, 6120, 6924, 5946, 6961, 7020, 7912, 6263 
2084  DATAKANSAS , TOPEKA , 4873 , 5225 , 4408 , 5455 , 5556 , 6023 , 5 0 45 
2086  DATAKANSAS, WICHITA, 4540, 4820, 4035, 4702, 4855, 531 0,4620 
20  88  DATAKENTUCKY , LOUISVILLE , 3697 , 4289 , 3694 ,5016, 4896 , 4583 , 4392 
2090  DATALOUSIANA,BATONROUGE, 1050, 1458, 1548, 2133, 1996, 1744, 1762 
2  0  92  DATALOUSIANA,NEWORLEANB, 931, 1295, 1430, 2 0  57, 1860, 1453, 1447 
2094  DATAMAINE, CARIBOU, 8980, 90 24, 8947, 9140, 81 52, 8638,7860 
2  0  96  DATAMAINE, PORTLAND, 6472, 6747, 67 09, 7462, 660 0,7 04 0,6427 
2 0 98  DATAMARYLAND , BALTIMORE , 424 1 , 4264 , 3857 , 4940 , 4542 ,45  0  8,4271 
210  0  DATAMASSACHUSETTS, BOSTON, 4998, 5230, 4620, 5492, 4963, 5425, 50 17 
2102  DATAMICHIGAN, DETROIT, 5923, 6375, 5583, 6754, 6408, 6538, 6088 
2104  DATAMICHIGAN , GRANDRAPIDS , 6338 , 6987 ,5933,7167, 6605 , 6944 , 589B 
2106  DATAMICHIGAN, SAULTST, MARIE, 8576, 86 02, 8079, 9047, 8245, 8848, 8021 
2108  DATAMINNESOTA,DULUTH, 9292, 9435, 8662, 931 0,8657, 9577, 8351 
2110  DATAMINNESOTA, INT. FALLS, 9844, 9755, 9435, 10 044, 9858, 10745, 9442 
2112  DATAMINNESOTA, MINNEAPOLIS, 756 0,7969, 6785, 780 0,7789, a 132, 714  0 
2114  DATAMISSISSIPPI, JACKSON, 1746, 2 0  66, 20 58, 2961, 2881, 245 1,2568 
2116  DATAMISSOURI,KANSASCITY, 4775, 5407, 4401, 5550, 5671, 5811, 5106 
2118  DATAMISSOURI, ST. LOUIS, 4507, 50 01, 4173, 5466, 541 0,5368, 4574 
2120  DATAMISSOURI , SPRINGFIELD, 3982 , 4659 , 3837, 5033 , 4973 ,5116,4140 
2122  DATAMONTANA,BILLINGS,6294,7106,6118,60  76,7  0  68,7878,S814 
2124  DATAMONTANA,GREATFALLS,6810,7482,650  3,60  06,760  6,B138,6164 
2126  DATAMONTANA, MISSOULA, 6797, 71 04, 6668, 6896, 6423, 80 68, 6439 
2128  DATANEBRASK A, LINCOLN, 6 0  67, 6504, 53 0  2, 6131, 6484, 6881, 5562 
213  0  DATANE&RASKA,GMAHA,6  0  69,6316,5037,6045,6140,6391,595'4 
2132  DATANEVADA,LASVEGAS, 24 18, 261 0,2296, 2150, 1664,2517,2147 
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COMPUTEI 


53 


213^ 

2136 
2138 
21'fO 
21^2 
214^ 
2146 
2148 
2150 
2152 
2154 
2156 
21  vjo 
2160 
2162 
2164 
2166 
2168 
2170 
2172 
2174 
2176 
2178 
2180 
2182 
2184 
2186 
2188 
2190 
Z192 
2194 
2196 
2198 


2204 
2206 
2208 
2210 
2990 
2995 
3000 


DATANEUADA, RENO, 5 184, 5820, 5548, 5196, 4228,5679, 


DATANEH 

DATANEW 

DATANEW 

DATANEN 

DATANEW 

DATANEW 

DATANEW 

DATANORTH 

DATANDRTH 

DATANDRTH 

DATANORTH 

DATANORTH 


HAMPSHIRE , CONCORD , 6924 ,730  4,7194, 7732 , 7094 , 7229 , 6479 
JERSEY, TRENTON , 4373 , 4763 , 4172 , 5355 , 5056 , 4818,4595 
MEXICO , ALBUQUERQUE , 4206 , 4707 , 4328 , 4761 , 3543 , 4020 , 3735 
MEXICO ,  RGSWELL.  ,3015,  366 0  ,  2771  ,  3469  ,2712,  3585  ,  3297 
YORK , ALBANY , 6539 , 6835 , 5999 , 6989 , 6315 ,6806,6023 
YORK, NEWYORK, 4333, 4643, 4 131, 51 95, 4804, 495 0,4434 
YORK, SYRACUSE, 6241, 6439, 5917, 6806, 6234, 6573, 5895 

CAROLINA, ASHEUILLE, 3375, 3947, 3843, 4755, 4281, 3882,3793 
CAROLINA, RALEIGH, 2758, 3550, 2895, 4258, 380 1,3286, 3464 
CAROLINA, WILMNGTN, 1683, 2249, 1908, 2847, 2658, 2256, 2464 


DAKOTA, FARGO, 917 1,8502, 7937, 8893, 90 12, 9915, 8402 
DAKOTA, WILLISTON, 87 14, 8616, 8081, 8192, 8867, 9784, 7787 
OAT AOHIO , COLUMBUS ,4701,5314, 4860 , 6494 , 586  0 , 5653 , 5253 
DATAOHIO, TOLEDO, 5996, 6243, 5674, 7093, 6673, 652 0,5992 
DATAGKLAHOMA , OKLACIT Y , 3278 , 3762 , 2950 , 3835 , 3977 , 4 1 42 , 3543 
DATAOREGON, BURNS, 6395, 6587, 6880, 61 02, 571 1,7093, 5830 
DATAOREGON , PORTLAND ,4070 ,3993 , 3992 , 40  57 , 3715 , 4577 , 3690 
DATAPENNSYLyANIA,HARRISeURG, 4509, 5199, 4498, 5437, 5059, 4915, 442; 
DATAPENNSYLUANIA, PITTSBURG, 50 05, 5516, 51 05, 6822, 5636, 5964, 5536 
DATAPENNSYLUANIA,SCRANTON, 5950, 5691,1 


.3^;il,  6642,  5963,  6348, 54 17 


DATARHODE 

DATASOUTH 

DATASOUTH 
id 


531,517 


6035,5497,5867,5029 


,1393,1941,1837,2702,2340,1972,2195 


ISLAND , PROUIDENCE ,5184 , od 

CAROLINA , CHARLESTON 

CAROLINA , GREENVILLE , 273  0 , 3199 , 2920 , 3851 , 3392 ,31^^, 

DAKOTA , RAPIDCITY , 6477 , 7  0  45 ,6111 ,6622 , 6923 , 7626 ,6050 
DATASOUTH  DAKOTA , SIOUXFALLS ,7088, 7598 , 6685 , 7484 , 7822 , 8393 , 6799 
DATATENNESSEE, CHATTANOOGA, 2898, 3694, 3313, 41 13, 3729, 3349, 3483 
DATATENNESSEE,KNOXUILLE, 2833, 3418, 3340, 4148, 3822, 3520, 3467 
DATATENNESSEE, MEMPHIS, 250 0,2878, 2526, 3442, 3355, 3205, 30 13 
DATAUTAH,SALTLAKECITY, 5402, 5495, 5392, 5370, 3982, 5526, 4722 
DATAyERMONT, BURLINGTON, 7276, 730 6, 6945, 7726, 7257, 7623, 6615 

DATAVIRGINIA , NORFOLK , 2674 ,3210, 2827 , 3817 , 3478 , 3432 , 3358 
DATAVIRGINIA, RICHMOND, 3265, 3944, 3232, 4389, 4033, 3861, 3532 
DATAWASHINGTON, SEATTLE, 4369, 4537, 420 0,3699, 3650, 4414, 3995 
DATAWASHINGTON, SPOKANE, 6171, 6613, 61 04, 5978, 5826, 7368, 5650 

DATAWEST  VIRGINIA , CHRLSTON , 3807 , 4813 , 3832 , 5487 ,4896 , 4534 , 4526 
DATAWISGONSIN,GREENBAY, 7324, 7794, 7079, 8319, 7616, 8227, 7040 
DATAWISCONSIN, MADISON, 6934, 7161, 6270, 7837, 7413, 7827, 6922 
DATAWYOMING, CHEYENNE, 6561, 71 06, 6274, 6540, 61 0  0, 6851, 6179 
DATAWYOMING, LANDER, 7122, 7482, 7058, 6961, 6445, 8528, 6891 
DATAEND , END ,0,0,0,0,0,0,0 
END 
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Your  computer  is  a  typesetter,  Send  us  a  tape  or 
diskette  with  text  for  your  book  or  other  manuscript. 
We  will  process  it  directly  on  your  typesetter. 

For  details  contact: 

Publisher 
Homing's  Mills 
Ontario  LOIN  IJO 
Canada 
(519)925-6035 

Describe  your  computer,  word  processor,  type  of  manuscript,  etc. 
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DYNACOMP 


Quality  software  for 

ATARI 

PET 

APPLE  II  Plus 


*. 


TRS-80  (Level  II)** 
NORTH  STAR 
CP/M  Disks/Disketles 


CARD  GAMES 


BRIDGE  2,0  < ATiilible  for  «IJ  compultn)  Prict:  sn.95  Cawiir/SI  I  .n  tn»k(ilf 

An  lU-inclusive  vtruon  of  thii  masi  popular  of  card  games,  This  program  boih  8tUS  and  PLAYS 
cilhci  corlrict  or  4uplicaK  bridic.  Depending  on  the  uonlract,  your  compuiei  opponcnis  will  cilher 
pUy  !he  offenw  OR  defenit  ]f  you  bid  loo  high,  thccompuier  i*Ul  double  you*  coniracit  BRIDGE  3.0 
provides  challenging  enlcnainmcni  for  advanced  players  and  is  an  eicclleni  learning  lool  for  ihe  bridge 
novice.  Set  ihc  loftwirc  icvjew  in  SO  Software  Crilique. 

HEARTS  1.5  ( Avillablc  for  bII  computers)  Prtc«:  $15.95  c*u(M(/f  ii».«  Diaktitt 

An  excilin^  and  enlerTaimna  compuier  verwor  of  Ihii  (Wpulir  card  game  Hcins  a  a  l rick -oricn led 
ixm<  in  which  ihc  purpoie  11  act  10  uke  any  hearts  or  ihc  queen  o(  ipadei.  Play  agaimt  iwo  computer 
opponenii  *rhD  ut  armed  with  hard-lo-bcal  pkying  itiaiejJei.  HEARTS  1,5  11  an  ideal  game  fO[  m 
irsadijcini  ihe  unmiliAtcd  (yojr  spoujcl  :o  compuier*.  See  the  software  review  in  80  Software  Crmquc. 

STUD  POKER  (Atari  only)  Price:  $1  l.M  Cawtte/S  I J.«  UUiflle 

This  IS  ihc  cl«SJic  gambler's  ;ard  game,  "Die  Compulcr  deais  the  card^  one  at  a  umc  and  you  (and  the 
compuicrl  bei  on  what  you  see.  The  compuier  doa  noi  cheat  and  usuaUy  beii  the  odds.  However,  it 
sometimes  bluffs!  Alw  included  is  a  five  card  draw  poker  beiiing  practice  program,  Thi^  package  uill 
run  on  a  16K  ATARI.  Coiot.  graphics,  sound. 

POKER  PARTY  (Available  for  all  computer)  Prtct:  S  n.95  Cmu*nt/%i  i  .9i  Dbkette 

POKER  PARTY  ii  a  draw  poJccr  simulation  baitd  on  iJlc  book,  POKER,  by  Oswald  Jacoby.  This  is 
the  mos!  comprehcniii^e  version  available  for  micnKompuieri,  The  party  consists  of  youiielf  and  ii« 
other  (compuier)  players.  Ea-;h  of  thcie  players  (you  u,i3]  get  loknow  ihemi  has  a  different  personality 
in  the  form  of  a  varying  pfopensity  10  bluff  or  fold  under  pressure.  Practice  with  POKER  PARTY 
before  gomg  10  that  e!ipensi*e  game  tonight!  Apple  Cassetie  and  diskette  versions  require  a}XK  lor 
larger)  Apple  ti. 

CRIBBAGE  2.0  (TRS-80  only)  prfce:  fU.9S  Caueite/SII.95  Dhkeiie 

This  is  limply  the  best  cribbage  game  available.  It  is  an  eKcellcni  program  for  the  cribbagc  player  in 
warch  of  a  i^onhy  opponent  a  wril  as  foi  the  novice  wishing  10  improve  his  ^amr.  The  graphics  are 
superb  and  aswmbly  lan^uajic  routines  ptovide  rapid  execution ,  Sec  the  software  review  in  HI)  Soflwaie 
CritifliUe. 


THOUGHT  PROVOKERS 

MANAGEMENT  SIMULATOR  *Al»ri.  North  Slir  ind  CP/M  only)        Pri«:  il9.9!  Caaeiie 

$13.95  mikille 
This  program  is  both  an  e«cUcni  teaching  tool  as  well  as  a  stimulating  intelleciual  game  Based  upon 
similar  games  played  at  graduate  business  schools,  each  pliycf  or  team  controls  a  company  which  man- 
ufacturers thtcc  products.  Each  player  attempts  to  outperform  his  competitors  by  setting  icllir^  prices, 
production  volumes,  marketing  and  design  expenditures  «C-  The  most  iuccessful  firm  ii  the  one  with 
Ihe  highest  stock  price  when  the  simulation  ends, 

FLIGHT  SIMULATOR  (Aviilible  fur  all  cotnputen)  Price:  417.95  Cuuiie/S2],9S  DUkcite 

A  rcaSistic  and  e«t*nii».e  mathemitieal  simulation  of  (a  te-off .  flight  and  landing.  The  program  utilizes 
aerodynamiic  equations  and  the  characlerislics  of  a  rea!  airfoil.  You  can  practice  instrument  approaches 
and  navigation  using  radials  and  compass  headings.  The  more  advanced  n>«  can  also  perform  [oops, 
half-rolls  and  simUar  aerobatic  maneuvers.  Although  thii  program  does  not  employ  giaphics,  it  is  ex- 
citing and  very  addictive   See  ihe  software  review  iis  COMPUTRONICS. 

VALDEZ  (Avaiiiblr  for  all  computers)  prict;  S15.95  CaiKiie/Ji4,95  Dbbeiie 

VALDEZ  is  a  computer  simulation  qf  supertanker  navigation  in  the  Prince  William  Sound/ Valdez 
Narrows  region  of  Alaslta,  Included  in  this  simulation  is  a  realistic  and  extensive  256  x  256  element 
map.  portion,!  of  which  may  be  viewed  using  the  shiip*s  alphanumeric  radar  display.  The  motion  of  the 
ship  itself  is  accurately  modelled  mathemaucalty.  The  simulation  also  contains  a  model  for  the  titlal 
patterns  in  the  region,  as  i*ell  as  other  traffic  (out|otng  tankers  and  drifting  iccbergsl  Chart  your 
course  ficm  the  Gulf  of  Alaska  ip  Valdei  Harbor:  See  the  software  tevicw  m  gQ  Software  Critique, 

BACKGAMMON  2.0(Ararl,  Nortli  Star  and  CP/M  only)   Pfkc:SU.95Cm«iie/$)g.95Dbkeiie 

This  program  tests  your  ba^^k^ammofV  skilll  and  will  also  improve  your  game,  A  human  can  Compete 
againii  a  computer  or  aguns!  another  human  The  campuicr  can  even  play  itself.  Either  the  human  or 
the  computer  can  double  or  generale  dice  rolls  Board  F>osilions  cin  be  created  Of  sai.ed  for  replay 
fNorth  Star  and  CP/MK  BACKGAMMON  2.0  is  played  in  accordance  with  the  official  rules  of  back  - 
gammon  and  ii  sure  10  provide  many  fascinating  Mssions  of  backgammon  play. 

NOMINOES  JIGSAW  (Alari.  Apple  and  TRS-SOonly)        prke;  $16.9S  CuHttt/S20.9S  Dtsketie 

A  jigsaw  puwle  on  youi  compuier!  Complete  the  puule  by  selecting  your  pieces  from  a  tabic  consisting 
of  60  different  shapes,  NO.MINOES  JIGSAW  ]i  a  virtuoso  programming  effort  The  graphas  are 
superlative  and  the  puwie  will  challenge  you  wnh  m  three  levels  of  difficulty  Scoring  is  based  upon  Ihe 
number  of  guesses  taken  and  by  the  difficulty  of  the  board  scT-up. 

CHESS  MASTER  (North  Sur  and  TRS-M  only)  Prfce:  St9.*5  CuKitc/SZ3.95  iMsketir 

This  complete  and  very  powerful  program  provides  five  les els  of  play.  It  includes  castling,  en  passant 
captures  and  the  promotion  of  pawns  Additionally.  The  board  may  be  preset  before  the  start  of  play, 
permitting  Ihe  examinaiion  of  "boclt"  plays.  To  ma.timiie  enecution  speed,  the  progiam  is  written  in 
assembly  language  (by  SOFTWARE  SPECIALISTS  of  California).  Full  giaphics  arc  employed  m  the 
TRS-flO  veriiort,  and  two  widths  of  alphanumeric  display  ate  provided  to  accommodate  Nonh  Star 
users. 

MOxNARCH  <Alari  only)  Price: Sll.*SCM*e«e/$lS.9ilJiTlieHe 

MONARCH  IS  a  fascinating  economic  simulation  tequiimg  you  to  survive  an  H  yea!  letm  as  your  na- 
tion's leader  You  determine  the  amount  of  acreage  devoted  to  industrial  and  agnculiucal  use.  how 
much  food  to  distribute  to  the  populace  and  how  much  should  be  spent  on  pollution  control.  You  will 
fmd  that  all  decisions  mvoKf  a,  compromise  and  that  it  is  not  easy  to  malie  everyone  happy. 

CHOMP-OTHKLLOlAlarionl))  Price:  S1l.95Cast«lle  SIS.95  DiskeKe 

CHOMP  Onit  1.1, CJ:"  its  leally  two  challenging  games  in  one.  CKO.MPis  simdann  ^i^ncept  to  MM; 
you  must  bile  ofl  pan  uf  a  ccuJkie.  but  avoid  lakinjt  the  poivoned  portion.  OTHELLO  is  |j)c  popular 
boatd  game  set  to  fully  utilise  ihc  A(an\  Kfaphurs  cApibltily.  Jt  11  also  very  hard  10  beat !  This  package 
will  ^un  on  a  lAK  system. 


DYNACOMP  OFFERS  THE  FOLLOWING 

•  Widest  variety 

•  Guaranteed  quality 

•  Fastest  delivery 

•  Friendly  customer  service 

•  Free  catalog 

•  24  hour  order  phone 


AND  MORE. 


STARTREK  J. 2  i AvaUable  for  all  computers)  Prio-:  vt  I  .n  Caiut(e/sl5.9S  Dbkcitc 

This  is  the  ctassic  SiarireX  simulation,  but  with  several  new  featuie:  For  example,  the  Klingons  now 
s^hoDt  at  the  Enterprise  without  warning  white  also  attacking;  st^irtia-ses  in  other  quadrants.  The 
Klingons  also  attack  with  both  light  and  heavy  cruisers  and  moi.c  when  shot  at!  The  situation  is  hectic 
when  the  Enterprise  is  besieged  by  three  heavy  cruisers  and  a  siarbas.:  S  O.S ,  is  received !  The  Klingons 
get  even!  See  the  software  reviews  in  A.N.A.L.O.G.,  80  Sofiwaic  t'Liique  and  Game  Mejchandisuig. 

BLACK  HOLE  (Apple only)  Prter: S14.9S Casxtic/Slt.95  Dishnie 

This  IS  an  eitciting  graphical  simulation  of  lh.eprDbkins  Involved  in  tbicly  observing  a  black  hole  wi|h 
a  space  probe.  The  object  is  to  enter  and  maintain,  for  a  prescribed  time,  an  orbit  close  to  a  small  blacfc 
hole.  This  is  to  be  achieved  without  coming  so  neai  the  anomaly  that  th  c  tidal  stress  destroys  the  probe. 
Control  of  the  craft  is  realistically  simulated  using  side  jcU  for  roUtit  n  and  main  thrustcrs  for  accelera- 
tion. This  program  employs  Hi-Res  graphics  and  is  educational  as  -ell  as  challenging. 

SPACE  TILT  (Apple  only)  Pric-;  SlO.95  Caswtie/SH.95  Diskette 

Use  the  game  paddles  to  lilt  the  plane  of  the  TV  screen  to  "toll"  a  bsiK  mio  aholc  in  the  screen.  Sound 
simple?  Mot  when  the  hole  gets  smaller  and  smaller!  A  huilt-ixi  time-  allows  you  to  measure  your  skill 
against  others  m  this  habit-forming  action  game. 

MOVING  MAZE  (Apple  only*  Pric-;  SiO.95  CaswMe/St4.9*  Diskette 

MOVING  MAZE  employs  the  ^ames  paddles  to  direct  a  puck  froni  ".ne  side  of  a  ma^e  to  the  other. 
However,  the  maze  is  dynamtcully  (and  randomly)  built  and  is  conti  lually  being  modified.  The  ob;ec- 
tisc  n  to  cross  the  maie  without  touching  (or  being  hit  by)  a  wall.  Scoring  is  by  an  elapsed  time  in- 
dicator, and  thre«  levds  of  play  arc  provided 

ALPHA  FIGHTER  (Alari  only)  Prk.*:  %u.<t$  CaHe(le/Sl8.95  Diskette 

Two  escellent  graphics  and  action  programs  m  one!  ALPHA  FlCiin  ER  requires  you  to  destroy  the 
alien  siarships  passing  throujih  your  sector  of  thegatajty,  ALPHA  BASE  is  m  the  path  of  an  alien  UFO 
invasion;  let  five  UFO's  gel  by  and  the  game  ends.  Both  games  requiicihc  joystick  and  get  progrcsMi-c- 
ly  mote  difficuh  the  higher  you  score! 

INTRUDER  ALERT  <Aiari  only)  Prk -:  $16.9* CMw<te/ll0.95  Di>kei(e 

This  is  a  fast  paced  graphics  game  which  places  yoti  in  the  middle  of  the  "  Dreadiiar' '  has  ing  juse  iiokn 
its  plam.  The  droids  have  been  alerted  and  are  directed  to  dcstt oy  y-ju  at  all  COKS^.  Vou  must  find  and 
enter  your  ship  to  escape  with  the  plans.  Five  lesek  of  difficulty  are  picvided  INTRUDER  ALERT  re- 
Quires  a  joystick  and  will  run  on  |6K  systems. 

GIANT  SLALOM  {Atari  only)  Prko:  si4.MC*3Kiic/Sil.95Disl.nte 

This  real  time  acno/l  game  is  guaranteed  addictive!  Use  the  ]ossi  ^k  to  control  yout  path  through 
slalom  courses  consisting  of  both  open  and  closed  gates.  Choose  from  different  levels  of  difficulty,  race 
against  other  players  0:  simply  take  practice  tuns  against  the clocV,  <ilANf  SLALOM  will  run  on  16K 
systems. 

GAMES  PACK  I  iAviUabk  for  all  compuier^)  Fric-:  510.95  Caai«tte/Sl-*.9S  DHkelle 

GAMES  P.'^CK  I  contains  Ihc  classtc  computer  games  of  BLACKJACK,  LUNAR  LANDER.  CRAPS, 
HORSER.ACE,  SV,  ITCH  and  more.  These  g.amts  have  been  com)>inEti  into  one  large  piogram  for  case 
in  loading  They  are  indisidually  accessed  by  a  convenient  menu,  Th  %.;ollection  is  worth  the  price  juH 
for  the  DYNACOMP  version  of  BLACKJACK. 

GAMES  PACK  IHAvalbble  rorallcampuiers)  Prki;SI0.9SC«»e(ie/SiJI.95  Dlikiiie 

GAMES  PACK  II  includes  ihe  games  CRAZY  EIGHTS,  JOTTO.  /»(.  HYDUCEY.  LIFE,  WUMPUS 
and  others.  As  with  GAMES  PACK  I,  all  the  games  arc  loaded  as  one  program  and  arc  called  ftom  a 
menu.  You  wUl  panicularly  enjoy  DYNaCOMP's  version  of  CRA£V  EIGHTS. 
Why  pay  S7,95  or  mote  per  program  when  you  can  buy  a  DYNACOMP  cgljection  for  just  SIO.W? 

MOON  PROBE  (Atari  only )  Prfc,.;  ^1 1 .95  CasMtte^SlS.M  Dlikeite 

This  is  an  eittcmcly  challenging  "lunar  landct""  program.  The  user  must  drop  from  otbii  to  land  at  a 
predetermined  taigel  on  the  moon's  surface.  Vou  Control  the  thrust  jnd  oneniaiion  of  youi  ^raft  plus 
direct  the  rate  of  descent    and  approach  angle. 


ADVENTURE 


CRANSTON  MANOR  ADVENTURE  (North  SCar  and  CP/M  ttiily)  Price:  SIi.95  Dhkelte 
At  last!  A  comptehenuse  Adventure  game  for  Noith  Slat  t  RAriSFOV  MANOR  ADVl.N1i;KE 
lakes  you  inio  mysierhous  t  RANSTON  MANOR  where  ytiy  ^ticiirt  !o  gathci  fabulous  trcasuies 
I  urking  m  the  manot  are  *Ltd  animals  and  tobois  who  wUl  not  gisi  up  the  treasures  wuhoui  a  fjght 
The  nuniber  of  rooms  :S  greater  and  the  associated  dejcnptiiOtisafcnLich  more  elaborate  than  the  cui- 
Tcnt  popular  scries  of  Adventure  prugrams,  making  ihis  game  the  top  m  its  class.  Play  can  be  slopped 
at  any  time  and  the  status  sioicd  on  diskate 


ABOUT  DYNACOMP 

DYNACOMP  is  a  leading  distributor  of  sma)!  svitem  ^ofls^arc  with  sales  spanning  the  world 
(currrnily  in  excess  of  40  couniricsL  During  the  past  iwo  years  we  have  greatly  enlargi-d  the 
DYNACOMP  produci  line,  but  have  maintained  and  improved  our  high  level  of  quality  and 
customer  support  The  achievement  in  quaLly  is  apparent  Irom  isuf  many  repeat  cii5toititf', 
anJ  the  sofiwarc  rcsirw.  in  such  publKations  as  COMPUTRONtCS.  SO  Software  Crilique 
ami  A  N.A.I. .0X1  Oiir  cuviomer  support  is  as  close  as  yotir  pliunc.  ti  is  always  friendly. 
The  viaff  is  highly  trained  and  always  willmg  to  discuss  produ.-i-.  or  give  advice. 


'ATARI,     PET.     TfiSK,     .\ORTHSTAft,     CP'M    and    IBM    are    registered    rradtnamts    and  or  trademarks.       "TRU-MO  dukenes  are  no!  supplied  wiifi  DOS  or  BASIC 


BUSINESS  and  UTILITIES 

5PF I  L  GUARD  w  »  rrToluLionanj  nf*  pt<»Jii(i  -hith  incmwv  ihe  vilur  M  )Oui  Lurrrni  koiJ  puKcvMn*  ■.)  mm  |\V  URl) 
STAB.  MACilC  WlaND.  EtFCTSIC  PENCIL.  TEXTID  tlVllOK  II  and  iJihciil  ^rillfn  mtirc^  hi  j^tmhlv  lunfiiiiir. 
SPFiL.t  taJAftr^TM  r^p,dt^  i,>4n[,  tht  viwi  in  rlimtniiinj  ^ptaini  AJid  iypoi;rjplin:al  cftots  by  ^umpiimg  fith  wiiitJ  ot  iJir 
lem  4.rimM  I  dJitmnJiy  [npindiUcjof  d^*[  20^000  of  ihe  moH  eommon  Eri|lijh  wgidi.  W™diipp«arirf  m  ihc  if*i  hm  mn 
foijnd  in  ihf  ■licrjonr)'  lit  "na||cd"  for  ea!>  id^niincaLiun  ■nJcormlipn  Mmi  idin]rit.iriii»r  !I*«I  fjmiliaf  *pih  »miJ  pm 
Cn^mi  tquipmrfi!  «ill  he  ibk  id '^ic  SPELLGUARdTM  ,„  wily  ^  r*.  tt^iUMti. 

MAIL  LIST  2.2  lAppk.  Awri  tnd  Nonli  Sitr  dbkdle  only)  P**":  "<■« 

Thu  pio|r«mnijtiffl*KlT.n!initn6JiS»  lo  Mpf*  «  m*»imum  numhrr  n(  «ddte>KTor  oreilnlirtleCminifni+iti  "I  I  li»lp«' di^k- 
dte.  mot*  <li«n  iJ«>  !or  "douBIt  atnuiji"  i>*ttfm'l  lliraarj  rr^iurfimiluiilc' itpriibctH;  iind  Jipci^dr  ttyrhni,  tiM:[Xiniin#. 
mcfOM  «f  'il*^  'nJ  -  uftiyut  tri>"0>a  itrkini  fouiine  -  hi.:h  lelfifici  fntrn-i,  Bi,  ■  ■..iiujli^  l.mjl*ii  «k..iion  oi  u^ti  ittrmrJ 
iTrtdn    M»iJ  L  111  ;  ;  -ill  r-tn  (i.nd  *i!(J  tJcLfit  t!uplK«Ec  rniiwi    A  **[>  *ilu«Mt  prnH"^' 

FORM  LETTER  S^  STEM  (FLS) (Apple-nil  ?*oflh  Sur  dbhrtit  gnl}]  rri«:  UI.W 

Lw  FLS  ID  tr«ie  und  cdil  foim  tfi*i4  wd  wldieii  Liu  Form  Iciictt  ire  producnl  bj  iulo(n»!i(4U>  mitrimj  riih  iddrttii  in 
[0  a  prnkieiramnJ  ppnJo.n  oJ.XiLH  l*iin.  FLS  n  complct*lj  fcmpaiibk  -iih  MAlt  LIST  ;4.  -hi^h  mi(  be  u«d  to  tn*njjK 
yaixt  tdJinii  fiki 
FL5  inJ  MA]  I   1  l^T  ^  I  *fi  n^a^bk  u  ■  combined  packajr  lai  U9  4} 

SORTtTfSonhSiirQnlr) 

^hTIT  II  *  ^ii^ial  rur{wu  Mit  proiiini  wriiien  in  lOBO'immbl)'  lin|ji|r  Th»  pioffAim  « 
(enrtititiJ  by  NOBT II  STAR  BASIC  Piimiy  Md  upidoml  i«ond«>  Icri  ff*-t  «  n«mt(ic  «(  o 
SfimiT  is(4iilf  U'vrdirtth  tilt*  |tiHf*[fd  tvy  DYNACOMP*  MAll  LI5.T  rtatrtm  ind  ii  vciy  » 
pJI  mh(t  a^Sli:  Jita  (Ik  wtijni. 

PERSONAL  FIN A^CE  SVSTEM  ( Altri  and  Ngrth  -Slif  onljl  Pr»":  >«■«  Ohirtir 

PFS  n  *  liftlle  diti.  mrnu  orKni>rd  uMcm  cemipatcd  of  IDfirp^rani)  (lt»i|h*d  lo  (utinut  irwJ  Minplifj  your  pcEwnal  fin^n^o 
Fejiuin  include  «  300  iruiuniorLnpacKy;  liil  *ko.s;  JA  pcxian^l  sJ^er  csxlei:  il«iz  mricval  b>  rrtonlh.  eotk  oi  p4*r*;  oji- 
iionil  piin[in|criepofis;L:h«lib«jl;  UUncini:  bii  jfipli  pkHimi  And  moie  Alio  pro^sdid:  on  i^c  Aim  dukni*  n  ATARI 
IX)5  : 

THE  COMMUNICATOR  (Atwi  onlj)  f**"  «•"  D*^"* 

Ttirt  wftwrr  pKkilf  toniiin*  i  incnu-diitm  colkmoi  ol  pro|iftmi  foi  (•£ilii«iiri,t  rFriti^ni  i^awjir  cmumunhiiiiioni 
thmufh  *  lull  Jupl(*  niodeni  (required  (or  uwl  Ifl  oat  motit  of  qpct»Ip9A  yqv  tnii  connKt  )o  A  diu  **r*Kt  (e  i .  TTw 
50UJICE  o)  MKro^Nnl  ■»!  4ukLI>  lo»d  diU  Mlt^  »  *tc*k  atiQUiKim  pmo  >i*uf  drikme  for  liter  twi^ini  thu  ireiih  't 
dufti  'cennrci  !knic"UKl  ihui  iIk  KP-KcdMTjf  YaiiTiuir  aim  itvOid  itw  iompkte  comcriii  of  *  CDmrnunicalioni  ^fvm«i 
Addjt  onali)',  ptoittm  «  nuen  in  &ASIC,  FORTRAN,  tu  fhi>  b*  buili  ati-l\M  uiiai  ihc  luitpod  lexl  ediiei  *nt  l*Ut  "' -p- 
loKled"  lo  *rvoih«  wmpuier.  nskkini  ihe  Alw5  ■  nf^v  tinvi  Ltrmiiul  Ewn  Ai*ri  BASIC  pro|iami  may  be  lpImJcJ  FiUi- 
ihn.  •  eortiinind  (d*  miy  be  budt  otl-linc^nd  uiwt  liiw  ii  tomiotlini  irpji  foi  i  iime-ihaie  syMem.  TImI  ?>,  >ou  t»n  i<i  ^ 
y^ur  xqunKC  of  limc-vlurr  cD4nr°^n^^  Uil  piotrJimi.  And  ilir  Atari  iiiU  irsnunii  :lirtn  is  neededi  biUh  pTtKrfiii''t  All  ihii 
■ddi  up  lo  MHHH  b^h  C0ftn«i  time  and  yout  iim*. 

DVNACOMPiliio  wppliei  THE  COMMUNICAIOB  *iih  in  Aim  BJOmwJnn  for  »i:ombin«l  price  of  «19,9J  Themodcm 
It  t^iiliblt  wpiTiiely  for  %\tV.tS. 


Prkr:  JW  W  IHikrtle 


nincchji'M.ici  ti 


TEXTEIirTOBIKLP/M) 

This  II  ihc  iKOfid  rrlciK  '■cr 
tiniTOilllyawrtiiybiaildKi 
dckitJ   Filtimif  b* 


roFiOf  PYNACOMPiptipiilii  TbXr  l.UITOR  I  *nd  eoniair.s  tniny  ne«  feiluiei.  WiihTj-XT 
t  fikiin  ch jn.lii  mil  iiMrrWc  ibm  tw  Uter  diipliy.  Hiocfctol  teil  miy  h:  kpptndrd.  mwittd  or 
I  diU/djiii.riie  in  rii|hi  luturicd^enietcd  li>imil  Id  t>r  liter  prirlnl  b)  tAhtr  TEXT  tUITUR  II 


■  iht  rP/M  ED  fi.;iLiiy,  Fuiher,  ASCII  CP/M  Tiiei  (indudint  BA!ilC  ird  iiwinbly  UfiUJiM  pnoaiiin!)  mir  be  rrad  bj  ttii: 
rdicet  ind  prflceiwd  In  fict,  leii  illn  cin  be  buili  unn»  ED  wifl  Uin  formilltd  yiinj  TTXT  EDITOR  II  All  in  *i\.  TEXT 
EDITOR  II  II  in  ineipcnuve.  euy  lo  uic.  bui  tiCr;  fleijbk  ediljni  ijnJnn. 

CO.MPHFJiS  (North  Siuoaltr)  Prt«:  "l« 

COMPRESS  n  a  Mr|jc-duk  uiiljij  pia^un  *hxh  lemovtt  ill  uiVKCtUVY  spiwiand  lopdanally).  REMiik  i:iiETn<n;i  from 
North  Sill  BASIC  pro|iaini  The  Mnirte  file  :i  procriKd  one  Ime  •!  •  (une,  ihji  [wiiriiEins  sery  lu|e  pioirami  to  be  lom. 
IirctirJ  uvini  only  a  ^mill  imoun:  of  compulei  memorj    File  (OrrprenKifti  nl  20- 50*^.  are  commonly  achw>  Ed 

DFILE  iSprth  SMt  oftJjl  ^'*"^  *'*  ** 

Thii  ttnii  piofTim  allo»i  N«l)l  Silt  u>eti  10  fiuiniliii  a  ip#i;iiliied  diia  bate  of  lU  rilciand  piofltinu  in  ihe  iliet^  o(d»ti 
»hji.S  ir'tiimbiy  a^cumutilr*  DFtLE  it  cair  'o  i*i  up  iftd  uw  li  '■dl  tiriuiie  yojf  divki  !0  provide  cfricient  IcKilini  of  ih< 
deviinl  (lie  oi  puT^'On 

UN  DIT  tMortJU  SUt  only)  Prt": »"  « 

Thii  m  (hiwir-oneproiiim  wrhich  mainiitns  informiiion  accmible  by  fccywordnjf  lh«et  [yp«-  Pwional  (rg  liu  T.unc>. 
ComniEicial  !*(,;  plumber!)  and  Rrfcrence  Irg;  mi|«ine  iilklei,  retOrd  llbur^s.  eic|.  Ln  iddiliS'D  Ko  Iteywoid  Kirchei,  ihere 
irebJTthdiy,»nni>«taiy  iTidappoinimen!  warchei  fof  the  pergonal  rfcordt  and  appoirlmmlsearchn  forth  ttotnmerciil  rr- 
iiordi   (tclrrence  record*  *!c  acce%>ctl  bj  a  smjt*  keyMiTrd  or  by  LroM-icfcreni^tnf  t*t3  or  Ihrce  fccywurdl 


f;HAFIX1TRS40Dnlyl 

Tbi*  unique  prof  i#m  AllOxi  you  lO 


ilyirreiniriphKidtrettly  from  Ihe  fceitnnid  Voir  "dm.."  tO'u'  ri|ure  uiUii  the  pro- 
(OmioU  0(weiheriiurei»mnl(,  iiiiiulamalitAUj'ippendedloj'CiJl  BASIC  pioifirniia  «rir(v»r- 
iMe.  Dri*  1  '"fiippi  iin<".  eill  i:  H\  and  ihen  prmi  ii  fTorn  your  profiam  jmhi  PRI^^■  HS'  Thitji  i  itiy  «n>  ny  lotreiir 
nd  M^c  ■iriphih't 


EDUCATION 


KODCE  P0IK:E  (Apple  only,  48K  AppJooh  or  Inwpr  BASICS  Price:  J19.95  t:-»-w?13.»S  Ihiknlf 

lHhOIM.HtilM.Ff.4-. i,MM.-l->.iHri   l'.rsiiPt«.ii»kfMH.<-ir  Apple>.ill.r»iili'n.i.tillerniijiniimn|(M.nK  tuj. 

iM'ikiiib:  '■■  UiilI  111  ilic  Irr  »'■••■  ■litiiiil'ri  'il  tliT  I  Ikhtii  Li-i     I  hr  )iiiiHii<iir<  ((i^pha-iitiilDr  .iiHJuHiiid  jir  j4Hi](hl  In 
Iroiiii^i'^l  I'JiihK  IKJIMLF  |1l|ll.Fiiui..i[i  „|j|iiirt  trji^iinHdr^kr  w|im  h  l.iiiiK4-*"r»«''1)n>en^M.n  ifjitif  UMr 


-iliililrrii, 


TEACHER'S  PET  I  (AvuUble  for  ^i  compui^nl 

|ll.N  iillir  111 I>VN\(<>MP.  cduiltiH.rul  |..»ikj|i:r'.    I'riinJi 

.j^ii.MHliilbrl.J.IPtK'""!''""*"'!"" ij!iir-iliir.kl!fl   *H.lll  ri 


r.KV-l  liir  |.ir-wh^«J  U>  ^rjHf  1^     I  F  A(   M^.tt^  I'F  I 


llhci 


IitieKii 


MORSE  CODE  TRAINER  (TRS-80  onljrj  Prie*:  »•*  "  C*««»SI«.1S  [hit 

MOKSF*  niU  m^]INFk.v.lr«(r.nll..ilt'*tblPJIHlnTi|U.r.rM»ir%jKTiljwl-.urj.*lllW(l(!t«fP.«.KMntwl..if  A.  1 
Ml  1  BiHHlrJ  wJii..iir(M.kjKf  h'r  F((ltci.i  i>i,-i«r  JlK-..ri*'i.wnrtm»lpi«nrrilhP"M|ihihr**r^i4*HMf  >*k(il*ii^  I 
iI^kI  .  iiKlir  pn  -t^'  \"U  mst  •  \fmt^  ilw  [My  U  ..|  ilw  I..p«-»  j.  -tII  ji  iSe  *-Hd  r^rr  Mm..  - jii.«i  liM.i^i  ..f  «pfT*iH« 
.,.  j.UMr  ....I.KI...K  ....ml^^p    )>LIPH  IMJf-.r.  4...I  -li.l»l»l  IrM.   ^1  *f1l  *Mbi-  k«^.|.^! «<r  .H..P  ci^vWKr     \  if  p>  rde^L^r 


MISCELLANEOUS 


CHVSTALS  (Atin  only)  Prw*:  I   9.MC.-ari«*ll3,SS  Di«k«tl' 

\  <k<PB|iki-4l|j*ip>iliin  ijiiiliipiih  |jp.HliKE-i.|^vpipj<fii»!K''»l'''"'^''"l''j'*-"""'n"i"^'*'"^""'**  "I'"''  *■"*  J.Mtifl>*"<rpi"4" 
I. ..ill  NMr»i.|Miii-i<p<.riri-iheuPTir.^iiHihr.»iidiiPH-plr!I.Fii^j4ilH'Mi'UPiilj|PiLl|{pjphi.>jitiiK-MTirTP^PiiM  <  K^  M  Vl  '^h..sl«^rii 
hiv'-l  11.  |>n>  jlii..>r>l.iilppri>>pi^rj>Ir  ihr  vnll.-1  Jii<i>i-l<hr  I  ral  IP  r  r\  • 'I' I  tie  \U  r  I 

NORTH  STAR  SOFTWARE  EXCHANGE  f NSSE)  LIBRARY 

\1\\  \l  il\U-  pi.Fi.  ihMrilnpIn  llw  i'^  i.ili.nir  \SSt  lihT4i>  I  hrw  ilmkettrM:*!  h  .isilaPTi  nuni  pr.-KijIiii  JtlH  f.llrr  jji  .hiI- 
.Uii.IippK  .  jl^.lr  >.rt  ilw  |Mii.hj*rr»r  Ibr*  i>«HpkUK- |i-P(  ..I  r»r.i  ^..iilpM.it  .iwp  m,.i11c<i^j4.  (.jIIh.i  wpudH  S  ^I  iimCNip 
.l<-4j>l>.irildP>itpiP|j  ihr  i.plilFPI-li.rl  Ihc*  SS^F  ■  i4tmH.ii 


!■    i'"l\  rjtti  IT  l-f'.TJill  ll  ■. 


r).LPiihju^.ll..i  IIV<-I^ 


AVAILABILITY 


[JY^iiAt  (IMP  iof!*iir  ii  igpplpei!  "Mi.  ^pinpifif  Hjntuftifniaiicm  Lomipfinn  utrat  f<tilJna{ion«  *npj  t^ainpkt  Unltii  oiherwjie 
tre\i'irLl,  all  O'l'i'a'X'i  vpH  fun  viihpn  IbK  proj.pi.mmfmor)'  ipacr  i  ATARI  TrquiTri^^K)  f  iceiti  Mherr  noKdn  f)rc(ramiiieiviil- 
ihlc  .in.  ATARI.  PTT.  THS'ftOiLihel  11}  imd  Applr  lApplr^^fij  ciiirttc  and  diikettr  at  veil  ii  Nodti  Stir  Mrjtr  denvi>i>  (doubk 
Jrn^iFi  .imfiiihkP  Jiikeile  Addjiiorilty.  mc.i  prtnrrinm:jn  be  Jt>iiirtnf  on  .landiid  I  IBS!  (Drmail  S"  CP  M  dnppt  diik.  ^o< 
o.frr.i  iLminj  unttet  MBASIC 


STATISTICS  and  ENGINEERING 


jirr  [Q  dciitn  tin  c 


DtCITAI.  FILTKR  (AviUabk  tur  lU  campulrn) 

DIGITAL  Fl  [  TEB  n  t  .nmrrehtni^r  Jaia  profissmi  proiram  *bKh  pern 
Lhiw«  Irumi  mcriL  oddltr  (uipfii  T^  hltfr  farmi  arr:  subsequentlj  fon^fiied  inio  non-KCJiii^e  iOTi.OiLition  coemcienu 
■-hich  permii  upiO  diU  pFoir.sing  In  ih*  eiplicii  design  mod*  Ihe  iS*PC  d  thr  Iftn^cacf  iranifer  Ufctton  a  ipKified  by 
dkrei.!!)  cnirf  Lng  poioti  alunj  ibe  desired  filler  curve.  In  ihe  mrokP  mpde.  pdtal  low  piM.  ^p|h  pii*  *iid  bmdpii!  Mieti  may  be 
*ppio..ni.(rd  !.■  riPf  iOi  drireei  ^uortlmi  lo  [he  numbw  of  poitM*  u**d  .n  the  cikuliiian  The^e  filiMimij  op[ianalJ>  alw  be 
spnwihol  ..lb  t  llansinj  lurLtion  In  iddition.  m^pltp  maje  Bmirr^ortJi  TdIrn  maj  M  ultntO  Feiium  of  DIGITAL 
Fl  I  TE-R  include  ph>iiir|  of  ihe  data  befott  iwl  ifur  filiw pn|.  »  ^*ell  ii  diipla.  ol  tht  tFuswr  filler  fumciwu  AIw  indwkd 
■tit  lonrtnieni  dm  uorije,  lelriri  li  ipiit  rdiiint  proe'tduret. 

l*AT  A  SMOOTH  KR  CNftI  ■*pil«bk  Fw  AI«iiJ  Prt":  *'*«  Cm»«im/HI.«  CHiirtic 

I  hi.  iinul  dan  .raowhin  prpirxm  nif  be  u  ted  (o  iaindl;>  dense  owful  infwmilwn  ffoPp  naiiir  buune*i  *nd  enipnrerpni, 
daii  ■h*;h  ire  enuallj  ip*.ed  The  wi|»«i*  Itkimti  choKC  m  deiieir  md  rinr  Ol  I-i*  ■*■  *«ll  •*  ifflooThed  firTl  and  ««>rtd 
iJcrii  iiise  vakLilaimn    Alv;  tncludu^  li  auianuiic  ploEiinj  of  ibe  input  dit«  and  imoMhrd  rnjlii. 

FOLRIER  ANALY/.EHU*Hllhl*1lor»llcMnpBlm)  Pftce:il6.WCm»rtlrU»  WDhkMir 

Lk  iliii  ptojTim  lo  ei»&>pfit  ih*  frequency  ipeata  of  limned  dyiiUUrt  •■tniit.  The  pro|rim  ittiuTn  aviomatrt^  walirf  and 
pluiiini  flf  [fie  input  0*t*  a^d  'huIh  Pririical  appLicaiions  include  |hf  inal)ipi  of  coftiplKiied  paltern*  tn  «ch  fiskls  ai  eke- 
iriiPH.!.  tomrrtUTuciiPoBi.  and  buiine^i 

TFA  (TttBt*(f  F«BClion  AMlyitr)  ^rtce:  llft.W  C*«*ru.tli.M  tMUtile 

ThiN  n  a  irr.;i»l  *iiifi»ar<  pickiir  *hich  may  be  owd  to  cMJutir  lh«  iriniftr  luncinini  of  lyilrmi  »y;h  n  bi  1.  imphlpetv  ind 
lillrri  fry  ei»ni.nLnj(  ih*ir  niporw  w  pulied  inpuli .  TFA  ti  i  major  modifk»iKWJ  of  FOURIER  ANAIY/ER  and  rotiupni  an 
enipnmLnt  oriented  decihcl  setiu.  lo|fiequriW»  pksi  "  *ell«i  diEi  ediimi  reiiurei.  Whtttii  FOURIER  ANALYiER  n  de- 
-..ined  tor  edLciiionl  and  KiemifK  uk.  TFA  pi  *r  en|ineerLnj  lool.  Aviikbk  (of  *ll  wmpuirti 

HARMOMC  ANAI.V2ER  (Avayabk  tat  lU  compulerj)  Prk.;  JW.M  Caaeru/Ill.M  Dtalttle 

HARMflNIC  ANALVZtK  ^ti  deiiined  fo!  the  ipctiium  analjiii  of  rirpciiii>e  «a>«foimi-  FeiEiirei  include  dui  HLegeneEi. 
ijon,  «diiin|  and  Mori|e/reine"il  ti  -ell  as  daia  ar.d  ipearum  ploiiini.  One  psnKularly  umque  laaLiy  is  ihai  the  input  d»i« 
need  noi  be  equally  ipKed  or  m  oiitef-  T^e  i>ri|inal  data  is  wited  and  acubic  n>4n*  tnierpoUtion  ii  used  id  CTMie  Ihedita  Hk 
lequired  by  Ihe  FFT  iljoiptftm 

FOLRIER  ANAl  Y7IR.  TIA  aad  HAR.MONIC  ANALYZER  pni!-  b*  puiehiied  loieihei  for  i  combined  jjtke  of  V<9  9! 
lEhrrt  si*>eitet]  ird  V<t  «  (ibree  diikeiieil 

RECIRESSION I  (A*«italMe  far  si  towpnitnt  rriee;  Si*  ♦*  C*-*n».Sli.«  Dfcktiw 

PEORESSIOS  I  11  a  unique  and  tacepEtorully  vrrkUple  orK-dimeniiona]  kiw  vqiiarn  '■pohnomial"  tune  Tiiiinj  profram 
Fnlu'n  pftClude  lery  F.i|h  iccuracr:  an  aulomaHc  iktttt  dHenninUKjn  opcior.  an  eilenusc  iflletnal  librae  of  riiiin(  fun< 
Horn;  d»!a  <dLiin|:  luiomiiK  dau  usd  eune  ptOdiB);  a  lUiHtieaJ  analpu  (ej:  ilaAdlid  dcvaiiOfl.  rorreUtion  coefficmt. 
etc  Jirid  much  more  In  iddiiKin.  ne~  fiumi^  bclriEd  *nboiut  reeniennjihe  iali.  REGRESSION  I  w  eeftainJy  tliecorntf- 
hiaat  program  in  any  dau  anaJyui  toflwe  iibfur 

REi:^h£SSION  II  (PARAFrTHA*pJUhk  For  >]lcompiiterv}  Prle*:  Jf».MC»«i«vSZ3.M  Dkketle 

PARAFIT  n  cVeiijned  ki  hirdk  ihoif  tawi  in  *hi:h  [be  parimcteri  ire  itnbrtiJtd  ipMiiblc  nonlineirlyf  in  ihe  fillinj  fuio:- 
iion   TbeuKT  iimply  m>eru  |hf  fujwii&naj  form,  including  Ihe  pifamele:ft  (AMI,  Ai2|,  etc  |  - 
lin«i.  D^ii  and  rc^utli  •nty  ht  manipLilatcd  ind  pkiiicd  a: 
and  PARAFIT  ("'  ihow  f^impticitcd  funclioni. 


e  BASIC  itatemetii 
'ilh  REGRESSION  I  Uie  REGRESSION  i  tor  polynomUl  filimf, 


rtttt:  iUM  CKmtU'iU.n  DUk.*iu 

lie  Imeiily  independ^ni  n-ariabki.  Beiidci 
data  enlrii.  iWiaj*-  '*^''*'  ■'  *'^'^  ediiini 
ibe  indepcrudeiii  vuiabki..  Thenurabei  of 


MU  LTILINEAR  REGRESSION  (MLR)  (AtiJtobk  tor  mH  conpnlm) 

MLR  [t.  a  profc»ional  iDft>hire  paEkifc  for  airily lini,  da la  ntu  coniainini  i<*0  ct : 

performini  ihe  bi.A"  reirriiion  cakufilwin.  [hil  p(a*ram  ilio  ptovidei  tMj  Eo  u 

funcitoni.  In  iddiiion.  ihe  jter  may  inleiiiiB*'*  'he  wluuan  by  lupplyinf  *iiuei  fi 

sarvablei  and  data  lue  ii  1icn»ted  only  by  rhE  i^ulablf  memory. 

REGRESSION  I.  If  and  MULTILINEAR  REGR£SSION  may  be  purchaied  lorrlhw  ts*  WLM  lEhree  caiseii«| 

(three  diikniet) 

ANOVA  (A*Byibk  forrfcomp*lm)  pr*M:t».«t:»en«  WJ.WDWrtle 

In  the  pavi  the  ASOVA  (inalyiii  of  sariancel  piDCtdMe  hai  been  Inwied  lO  iIm  larje  mainframe  compuim  No- 
DYNACOMI'  h"  biomhi  Ihe  po**r  of  ihn  mctlrtpd  id  unail  »y»1em»  Fo*  lho«  eonifriani  *iih  ANOVA.  ibc  DYNACOMP 
wIlAire  (i»<;Lu»  include*  the  l-*ay.  1-way  ind  S--miy  pnxedntit  Alto  provided  are  ihc  y«!ei  I*-'"  faeterial  dmf  m  fc* 
ihoW  unfainpliij  *iEh  ANOVA,  do  noi  »orry-  The  ac^omphiyiAk  dacummiation  vcai  wriEtcn  in  a  luto<»t^  flthign  (by  a  pio- 
ftnor  M  ih*  lubjecip  and  wn-e*  it  an  cKellenl  imUKJjCiion  lo  the  lubjesi .  Accompinyini  ANOVa  i*  t  iwpi»n  pieiram  'or 
buitdlni  the  dan  biK    Included  iie  teveril  con^mEm  feiiurei  mcliidpri  dan  cdiiinj:.  delcttnf  l<nd  ipperutini 

BASIC  SCIENTIFIC  SUBROUTINES.  VoJurae  I  (Not  ■vailibk  for  A»rt) 


the  popular  T*ii  BASIC  Snemiifir  Sutroutinn.  iolfmr  I 
BYTE  majuine.  Jantury  19?ll  The«  suhrouiinci  hai-e 
1  Ls  a  menu  proiriin  *h*fi  wiEeii  and  demonunieT  Eieh 


DTNACDfi^P  II  Ibe  eiduiiivE  dDiribuior  for  the  lotiwsje  keyed 

by  T.  RtickdMcfieJ  (see  ihe  BYTE/McGrl*  Hill  sdvEniwmeni  i 

btta  luembkd  acnrdiri  lo  chapter.  Includtij  wilh  «ub  collecti 

lubrouiinc. 

Colleciion  iTL     CTiapfcti  2  md  1      Daia  and  f  jnaiois  ploiiint.  eorapk^  vi|i»bfE* 
ColkKiwn  n      LTvipter  *;     Main*  and  vecior  operiiiotit 

CoUceiian  fi      Cliipleri  J  ind  6      Random  numbn  |ei?«iion,  lenei  appro uniiiior* 
PrieepercoUetlEOft.     SU  «  CaiinieUI-W  Djikrile 

Alt  ihj-ee  colieclmni  are  avijUbk  for  119  93  lEhrce  ciitcttesl  and  S4S.9S  llhtee  dii^Eiieij 

Becauae  the  lr«  ii  a  »ii*l  pm  of  ihedo«inM3iiaiioa.B^SICS<^r'iii/<f  5iJwoLm«,  i  atunrlii  asulabk  from  DYNACOMP 

for  I19.M  plu»  "!'.*  £*iia(*  and  hindlutj 

ROOTS  ( Avitobk  *or  U  conpotm)  ^rtce  Sl*,«  Ca*i«i*.lW,W  DtaUrtr 

In  »  iniTilwLI.  ROOTS  umulimeojily  delerminet  all  the  wtom  of  a  polyTJomial  ha^ini,  reil  loefriciciiii  There  it  no  Ibtiii  on 
Ibe  deitM  of  Ihe  polynomiiL  ind  betatnc  iheprocedufE  it  iteriti«,  the  lonHicy  u  leneriUy  very  iotd  So  initial  lucueiare 
rwjuiied  n  irpui.  ind  ibe  takuUtcd  tcph  -I'c  tuhiiituted  bK*  into  ibe  polynomial  and  lb*  leitduili.  ditptaycd. 

LOGIC  SIMULATOR  I Appk  only;  4tK  RAMt  Prtet:  »H.H  CM««e/m.»S  Wikwi 

With  LDtilt  SIMULATOR  )oii  may  eaiiiy  leu  yojr  complHriled  di|i|il  li>|i;  deii|n  wiih  r«p«i  lo  ii^m  wi  of  mpuit  to 
dnetmine  ho*  weU  iht  fitdjpi  ^iH  operate.  The  eknscnl*  which  miy  b<  ipmuliEed  include  mulEiple  inpui  AND.  OR.  NOR, 
EXOa.  tXNOR  and  NAND  lairi,  ai  well  a  uiverieri.  IK  BEid  D  Flpfifliopi.  and  one-ihoii.  The  retponw  Of  ib*  lyiiem  h 
iMilible  every  clock  ct(1*  Inpuii  may  be  clocked  m  *rth  viryini  do^k  cyck  kniihi/diipUeemenli  anddeliy^  may  he  iniro- 
dtjced  lo  probe  fOf  ilitcbeiind  ftcc  fondiiioni.  AI  the  u«f't  opiion.  a  liminj  dintwn  for  anf  |iven  »el  of  nodes  may  be  pkii- 
led  uiirn  HIRES  iraphKi.  Sa^e  youj  breadboardin^  urTtil  lbs  cir cuii  it  cbecltd  by  LtiGlC  SIMULATOR. 

LOGIC  DESIGNER  f  Nortfc  Slir  ud  CP/M  oiil>>  P)^-  "*■«  Wik"" 

LOGIC  DESIGNER  n  an  eicepiiona!  Compulet  Aided  PEii|n  tCAD}  projjrira.  With  i(  you  may  eopisen  alarje  andcomplp- 
ciitEd  dp|pip*l  tf  Lih  lafck  lihe  funstionil  ipecificatipnl  >iiid  an  opiumred  Boolean  Joik  et)uation  TFiii  enuKwi  may  ihcn  be 
roiit,  convened  mia  a^iicuii  dnun  uwnj  eHhei  SAND  oi  AND'QB  tatet  DxrilionaJI*.  LOGIC  DESIGSER  ii  (ompoted 
of  a  BASIC  pic<(iam>hich(aUi  w  *  pna^hme  Laniiaje  loutmc  eo  rffdLK:ee»ecutie>n  ipm*  E*unpk.  For  »  '  utiabJe  by  I  If  line 
Eabte,  Ehe  pjrucrtimi  (ane  ii  oRl*  l»*  mrnui**  LOGIC  DESIGNER  ii  ckarly  a  f*U  ♦bJ  po-eifuli  I!X>I  fcr  buildinj  di«mt in 


ORDERING  INFORMATION 


All  Oidtrt  art  rioi:evtcd  and  ihipped  ".ilbin  *S  houii   Pkirt  fmibK  payment  *uh  nrder  and  ins ludr  ihE  ippfupr lai 
fQrmaiit]n    II  payini  by  V  ISA  iir  Matter  Card.  incljd(  tU  ntinibff t.  on  card. 

Shlppfni  iBd  MindllaiChaftn 

Wiihin  Nanh  AmcPi.:a.  Add  II  !^ 

OulsLde  Noiih  Ameiici    Add  jO'i  lAil  Ma.lJ 

TMIterr 

All  o[det>  ieifludiria  t>*»ki|  ire  leni  Fini  CTast. 


■"i:r''MDu* 

Add  S:  M  to  Ibe  liued  diikeiie  piKe  for  eath  t"  ftoppy  duk  JBM  wfi  lecioted  CP'-M  (ormalj  Pfo(f*nLi  ti 
MKrowfi  MBASIC  or  BASIC-10 


n*"tP  SldJitii 


,  ilu;  aiiaiLabte  an 


•  i"  ditki.  Nonb  Viai  f 
e  far  drtailed  det.CTipiio 


(if  niriE  and  oihrr  p 


DYNACOMP,  Inc. 

1427  Monroe  Avenue 

Rochester,  New  York  14618 

24  hour  order  phone:  (716)586-7579 

Office  phone  {9AM-5PM  EST):  (716)442-8960 

%t-  ^urL  Sl.lr  reiMtnU  pku.  idd  ^^r  S>S  i.tn  l.i 
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Estimating 
Gas  iVIileage 
With  An  Empty 
Tank 

J,  L  Christensen 
El  Cajon,  CA 

In  days  gone  by,  the  estimation  of  gas  mileage  was 
routinely  pcilbrnied  by  many  tlrlvcfs  to  check  the 
health  of  their  favorite  conveyance.  Gasoline  \va.s 
cheap  and  the  procedure  was  straightforward.  One 
simply  filled  the  gas  tank,  drove  a  couple  hundred 
miles,  then  refilled  the  tank.  The  mileage  driven 
divided  by  the  gallons  to  refill  the  tank  was  the  gas 
mileage. 

Today,  witii  the  cost  of  gasoline  competing 
with  the  cost  of  a  nuclear  power  plant,  not  all  of  us 
can  afford  to  fill  the  tank  so  casually.  In  fact,  for 
long  periods  wc  may  find  ourselves  driving  consist- 
ently off  the  bottom  half  of  the  tank.  This  pracdce 
results  in  poor  mileage  estimates  since  we  no 
longer  have  a  solid  benchmark  (a  full  tank)  against 
which  to  measure  fuel  consumption. 

The  BASIC  program  presented  on  the  fol- 
lowing pages  helps  to  restore  gas  mileage  accuracy 
while  allowing  us  to  drive  off  the  botton  of  the 
tank.  Fuel  consumption  is  estimated  from  the  gas 
gauge  instead  of  the  'full  tank'  method.  As  everyone 
knows,  automobile  fuel  gauges  are  notoriously 
non-linear,  so  this  program  is  designed  to  calibrate 
the  gauge  by  fitting  a  cubic  equation  to  data  sup- 
plied by  the  driver.  The  program  estimates  gas 
mileage  over  any  selected  mileage  interval  which 
allt)ws  the  program  operator  to  cli.scriminate 
between  city  driving  and  the  mileage  obtained  on  a 
trip. 

How  To  Take  Data 

To  use  the  program,  the  driver  must  keep  a  log  in 
the  following  format: 


Miles 

Gallons 

Start 
Gauge 

End 
Gauge 

Figure  1.  The  Gasoline  Log 

Each  time  the  driver  visits  his  Irierully  service 
station,  he  should  enter  the  miles  from  the  odome- 
ter and  the  gallons  of  gas  added  to  the  tank.  He 
must  also  enter  the  gas  gauge  readings  before 


(Start  Gauge)  and  after  (End  Gauge)  adding  the 
gas.  For  a  bit  more  generality  you  may  want  to  add 
other  columns  for  the  date,  liters  (in  case  you  can't 
buy  gallons)  and  price. 

Now  fuel  gauges  are  normally  provided  with  a 
scale  of  several  divisions.  The  bottom  litic  is  marked 
with  an  'E'  while  the  top  of  the  scale  is  marked  with 
an  T'.  Automotive  gas  gauges  are  rarel)  provided 
with  numeric  annotation.  However,  the  driver  may 
supply  the  neces.sary  quantitative  meter  scale  by 
assigning  an  integer  value  to  each  division  begin- 
ning with  0  at  the  'E'  position.  Thus  the  gas  gauge 
will  appear  as  shown  below: 


Figure  2.  The  Gas  Gauge  Scale 

When  recording  the  fuel  gauge  reading,  the  driver 
is  expected  to  interpolate  between  divisions.  This  is 
normally  possible  to  within  about  ±  10%  of  the 
interdivision  scale.  The  fuel  gauge  reading  in  the 
above  figure  is  estimated  to  be  1 .4. 

Be  sure  to  read  the  gauge  when  the  car  is 
resting  on  level  ground.  Also  some  gauges  have  a 
very  sluggish  lesponse  so  the  driver  may  have  to 
wait  a  minute  or  so  after  restarting  the  car  to  get  an 
accurate  reading. 

If  the  fuel  consumption  during  a  trip  is  of 
interest,  the  driver  should  enter  the  odometer 
reading  at  the  start  of  the  trip,  tlic  fuel  added,  if 
any,  and  the  gauge  readings.  If  no  fuel  has  been 
added,  enter  0  in  the  Gallons  column  aiid  the  .same 
fuel  gauge  reading  in  both  the  Start  and  End 
Gauge  columns.  At  the  conclusion  of  the  trip, 
again  enter  the  odometer  reading.  0  gallons  and 
the  same  gauge  reading  in  boih  the  Siait  and  End 
Gauge  columns. 

Following  data  assimilation,  the  program  asks 
the  operator  for  the  minimum  mileage  interval 
over  which  the  fuel  consumption  will  be  computed. 
Proper  accoutu  will  be  taken  of  the  gas  remaining 
in  the  tank  at  the  start  and  end  of  each  interval.  If 
the  input  mileage  interval  corresponds  to  that  of  a 
trip,  the  gas  consumption  on  the  trip  will  be  com- 
puted as  well  as  the  consumption  over  oilier 
similar  intervals. 

Program  Operation 

The  flowchart  in  Figure  3  will  be  of  assii^tance  in 
identifying  major  functions  anti  operations  of  the 
[program. 

71ie  mileage  and  gas  gauge  flata  loi  ihe 
program  is  provided  in  a  DA  TA  statement  begin- 
ning at  line  201.  During  program  development, 
DATA  statements  are  preferred  over  IX PUT 


July,  1981.  Issue  14 


COMPUTEI 


57 


Agricultural  Software 
from  Cyberia™ 


FOR  PET/CBM  SYSTEMS 


Cyber-Farmer 


The  complete 
accounting  package  for  today's  farm  operations 

■  Records,  sorts,  combines  and  prints  the  results  of  tlie  farnn  operation. 

■  Account  headings  and  numbers  are  pre-assigned  for  neariy  every  type 
of  farm  income  or  expense,  but  any  account  may  be  deleted,  aitered  or 
added. 

■  Keeps  personal,  family  and  house-hold  accounts  as  well. 

■  Cyber-Farmer  management  tools  include  cash-flow  analyses,  depreci- 
ation schedules,  inventory  and  budget  reports. 

■  No  computer  experience  is  necessary  to  operate  this  system. 


Farrow-Filer" 

Record-keeping  and  management 
system  for  the  pork  producer 

■  Helps  the  pork  producer  to  lower  their  cost-per-pig 
by  producing  more  animals. 

■  High  visual  impact  of  reports  allows  for  better 
culling  of  freeloaders. 

■  Alerts  the  operator  to  possible  medical  problems 
in  the  herd. 

■  Forecasts  farrowings   for   a  3   month   period. 

■  Keeps  individual  records  on  each  animal. 


Farmer's  Workbook 

The  most  powerful  management  tool  ever  for  the 
agricultural  producer.  Farmers  Workbook  combines 
the  power  of  Visicalc"  *  with  the  knowledge  of  a  ma- 
jor midwestern  university.  The  Farmers  Workbook  is 
a  collection  of  templates  that  are  designed  to  be  run 
on  the  Visicalc*  program.  The  templates  include 
lables,  formulas,  sample  data,  test  cases  and  full 
documentation.  Template  titles  include;  Cattle 
Feeder,  Pig  Production,  Sheep  Production,  Grain 
Management,  Loan  Payments,  Market  Average,  Land 
Purchase  and  many  others. 

'Visicaic  is  a  trademark  of  Personal  Software,  Iric. 


Also...Two  Other  Enhancements  for  PET/CBM  Systems 


SuperBus 


Greatly  multiplies 
system  capabilities 


per  computer 


This  is  an  active,  integrated  system  — not  just  a  passive  network.  Super- 
Bus  gives  schools,  banks,  laboratories  and  businesses  control  of  the 
way  their  networks  operate. 

■  Up  to  18  computers,  disk  drives  or  printers  can  be  interconnected. 

■  Complete  file  security  (program  and  data)  and  BASIC  security. 

■  Built-in  error  detection  and  convenience  features. 

■  Can  both  read  and  write  to  disk. 

■  All  BASIC  commands  can  be  used. 


Auto-Boot 


Simplifies  PET/CBM  operation 


C/LQ95  per  computer 


Auto-Boot  is  a  ROM  that  automatically  loads  and  runs  the  first  program 

on  the  disk  (initializing  if  necessary).  /■■ 

Completely  compatible  with  most  other  programs.  /^ 

.  Just  insert  the  disk  in  the  drive,  turn  on  the  computer,  and  Auto-Boot 
does  the  rest. 


MasierCard.  VISA  and  COD   o'ders  accepted.  Specify  computer  model  when 
ordering  SueefBus  or  Auto  Boot  Dealer  inqMiries  in'/iled. 


^ 


l^LrtDf^L:---     515-292-7634 
2330  LINCOLN  WAY,  AMES,  IOWA  50010 
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niLES 

GAL 

57146. 

8.78 

57272. 

4.3 

5731  1  . 

4.39 

57349. 

1  .  6& 

57364. 

4  .35 

37394. 

8.  7 

57473. 

4.3 

57506. 

4.  17 

57550. 

4.  16 

ST 


GAUGE 

.  4 

.3 

.2 

.  I 

0 

0 

0 

.  1 
-.  1 


END  GAUGE 
2.  8 
1  .  9 
1.9 
.  6 
1  .  7 
2,  3 
\  .75 
I   .8 
1  .  5 


TAHK  EQUATION: 
GL  «  A3*<CA>*3 
ft3-. 609321 


*    A2*(GA)*2    +    AIKGft)    +    AO 
A2--1.7393?  Ai«3. 88762 


GAUGE 

0 

.2 

M 

.6 

.8 

1 

1.2 

1.4 

1.6 


1.8 
2 


2 

2 

2 

2 

3. 

3.2 

3.4 

3.6 

3.8 

4. 


GAL 
0 

.712824 
1 .31574 
1 .83801 
3088? 
75757 
21335 
70547 
26317 
915? 
69231 
62224 
73474 
OS906 
.6244 
.4601 
.5954 
.0595 
.8816 
.091 
.717 


2. 
2. 

3. 
3. 
4. 
4. 
5. 
6. 
7. 
9. 
10 
12 
14 
17 
19 
23 
26 


ST 
ST 
ST 
ST 
ST 
ST 


HI 
MI 
KI 
HI 
HI 
HI 


57146. 
57272. 
5731  t  . 
57349. 
57364  . 
57394  . 


ENO 
END 
END 
END 
END 
END 


HI157311 
HI: 57473 
HI  I  57473 
HIi  57506 
HII57550 
HI: 57550 


GAL 

:  13 

6829 

GAL 

!24 

4  26  2 

GAL 

19 

8128 

GAL 

19 

01 

GAL 

21 

9268 

GAL 

17 

5768 

TOTAL  GAL;42.3725 
AVE  HILES/GAL  :9. 01353 
OVER  AH  AVERAGE  INTERVAL 


TOTAL  HILES;404 


0F!l?1.167      HILES 


statements  since  the  data  is  not  losl  ii  (when)  ihc 
program  bombs.  In  either  case,  the  value  of  M 1  at 
line  153  must  be  set  equal  to  the  number  of  lines  of 
data. 

Following  data  input,  the  program  asks  for  the 
"MINIMUM  MILEAGE  INTERVAL"  over  which 
the  fuel  consumption  estimate  is  to  be  computed. 
This  value  is  called  Ul  in  subsequent  calculations. 
At  line  310,  the  program  commences  at  the  first 


HI/GAL 
HI/GAL 
HI/GAL 
HI/GAL 
MI/GftL 
HI/GAL 


12. 0588 
8.22887 
17652 
25881 
48278 
87535 


mileage  enlry  and  searches  tlirougli  following 
entries  until  it  finds  the  next  entry  and  searches 
through  following  entries  until  it  finds  the  next 
entry  that  equals  or  exceeds  the  first  entry  by  U  1 . 
The  gas  consumption  is  computed  over  i  jiis  interval 
and  the  program  llien  returns  lo  the  second  entry 
and  performs  the  same  task.  If  you  would  like  the 
mileage  between  each  visit  to  the  pump,  enter  0  for 
(he  minimum  mileage  interval. 
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TRS-80 
SWTP 


Model  EP-2A-79 

EPROM  Programmer 


Heath  H-B 


PET  «  APPLf  »  AIIVI-65*  KH 


SYM-1  »  OHIO  SCIENTIFIC 


Sofuviirf  available  for  F-8.  680(1,  8085.  8080,  Z-80  6502  1802 
25ri(),  6809  based  sv.'slenis. 

EPROM  type  is  selected  by  a  personality  module  which  plugs  into 
the  front  of  the  programmer.  Power  requirements  are  115  VAC 
50/60  Hz.  at  15  watts.  It  is  supplied  with  a  36-inch  ribbon  cable  for 
connectinq  to  microcomputer.  Requires  1'^  I/O  ports.  Priced  at 
$169.00  vMth  one  set  of  softu'are,  (Additional  software  on  disk  and 
cassette  for  various  systems.)  Personality  modules  are  shown  below. 

Prin  Nn,  Programs                                                                                                     Price 

I'Md  TMS  271)8  i.\7(V 

I'M  1  27IM.2708 171KI 

PM2  2732        - XiW 

PM:3  TMS  2716        , ]7W 

PM4  TMS  2532  : X((*l 

PM5  TMS  2S16.  271().2758  I7(Kl 

PMH  MCM687M  .  :tr.Ui 

Optimal  Technology,  Inc. 

Blue  Wood  127,  Earlysville,  Virginia  22936 
Phone  (804)  973-5482 


WANT  YOUR  COMPUTER  BACK?' 


Microcomputer  (MMC)  take  over  any 


TM 
Lei   the  MICROsport 

dedicated  task. 

It  is  the  affordable  alternative  -  kits  from  $89.00,  application 
units  from  only  SI  19.00  (assembled  and  tested). 

It  is  user-oriented  -  complete  in-cireuit  emulation  allows  pro- 
gram development  on  ANY  6502  based  system.  It  is  compact 
(4Vi"  X  6'/;"  pc  board)  but  powerful  (32  I/O  lines;  20  mA  full 
duplex.  IK  RAM  +  EPROM  socket  4/16  bit  counters;  6503 
CPU)  and  works  off  any  AC  or  DC  power  supply. 

Turn  your  present  6502  based  system  into  a  complete  develop- 
ment system  with: 

1  MMC/03D  Microcomputer  with  ZII-  sockets 
1  MMC703ICE  In-circuit  emulator  for  the  6503  CPU 
1  MMC/03EPA  EPROM  Programmer  complete  with  software 
driver. 


For  more  info  call  or  write 

,  J.  BRACHMAN  ASSOCIATES,  INC 
P.O.  Box  1077 
Havertown,  PA  19083 
(215)622-5495 


MCC 


AIM-65   ACCESSORIES 


20076  CHAPMAN  AVE 
ORANGE,  CALIF.  92669 
714    633-0245 


Now  you  can  have  your  favorite  most 

useful    programs,    including    BASIC    pro- 
grams, available   in   EPROM   for  instant 

use! 
Our  EPROM  PROGRAMMER  and  EPROM 

EXPANSION    are  already   known  as  the 

most  economical  AIM-65'  accessories  on 

the  market.  Now  in  addition  to  their  proven 

usefulness  for  those  working  in  assembly 

arid  machine  language  you  can  save  and  enecute 
BASIC  programs  in  EPROM. 

Enjoy  trie  time-saving  ease  ol  programming  m  BASIC  and  the 
powerful  capability  of  Instant  execution  all  tor  only  SI 25.00  lor  both 
boards. 
Of  course  all  of  our  (ime-tested  features  are  included  The  programmer  pro- 
grams all  2  and  4  Kbyte  EPROMS  compatible  with  AIM-65.  features  selec- 
table blank  check  and  verify,  duplicates  existing  EPROMs,  and  includes  full 
ulilily  roultnes  to  relocate  ob|ecl  code  in  RAM  to  any  EPROM  address 

The  EPROM  EXPANSION  gives  you  8  Kbyte  of  exira  EPROM  memory  space 
oliminaling  the  need  to  remove  your  assembler  or  BASIC  ROMs,  And  both 
boards  feature  siraighi-ihru"  (see  picture)  design  for  total  compatibility 
witfi  otfier  AIM-65  accessories  And  now  BASIC  in  EPROM  opens  a  new  world 
of  applications  for  your  Allvl-65! 

'A  '.' -  ■     ^    t  --TifTefTis'k  nt  Rftrk^ell  lnlp^na1vDnal 


EPROM 
EXPANSION 
$38.50 


And     remember     liflCC     Mas     ottier     fine     AIM  65 

accessories  available  too' 

Centronics  pon  572  60  (soltware  and  cable  included) 
RS  232  perl  578  00  (foriui'es  +  6  volts  only,  cable  in- 
cluded! 

■  EPROM    EXPANSION     with    jero  insertion-force 
sockets  soltvjare  coslom  designs  and  more" 

■  Call  0'  wnie  tor  additional  product  intormation  at  no 
charge 

Dealer  and  OEM  inauines  invited  Prices  are  US 
only   and  do  ^o\  include  shipping 
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READ  DATA 
LINES  100-209 


.  Set  Ml  equal  to  the 
number  of  entries. 


GET  MINIMUM 
MILEAGE  INTERVAL 
LINE  254 


I 


GOSUB  4500 


GOSUB  1000 


I 

GOSUB  2000 

^^ 

GOSUB  1100 

i 

GOSUB  4000 

.  Print  input  data. 

.  Get  matrix  of  the  system. 

.  Get  determinant  of  matrix  (D2). 

.  Get  coefficients  of  gas  gauge 
equation. 

Print  gas  tank  calibration  table. 


COMPUTE  MILEAGE 
PRINT  RESULTS 
LINES  300-495 


Figure  3.  Program  Flowchart 

The  fuel  consumption,  Gl,  between  two 
mileage  entries,  Ml  and  M2,  is  computed  at  line 
342.  It  is  the  total  gallons  added  between  M 1  and 
M2  (including  the  fuel  at  Ml  but  excluding  the 
fuel  at  M2)  plus  the  luel  in  the  tank  at  VII  minus 
the  fuel  in  the  tank  at  M2.  The  fuel  in  the  tank  at 
the  time  of  the  mileage  readings  is  computed  from 
the  gas  gauge  ecjuations  at  lines  3  16  and  340.  The 
program  prints  intermediate  results  at  line  343 
and  final  results  are  printed  following  the  end  of 
the  primary  FOR-NEXT  loop  at  line  450.  If  the 
operator  has  entered  a  minimum  interval  which 
exceeds  the  available  data  entries,  the  program  will 
print  "IXSUF.  DATA  OR  INI  ERVAL  I  OO 
LONG"  and  recycle  to  get  a  lower  value  for  the 
minimum  interval.  The  total  gas  consumed  over 
the  entire  data  set,  G4,  and  the  total  mileage 
interval  of  the  data  set,  Z4,  is  computed  at  lines  396 
and  397  respectively. 

Insofar  as  practical  there  has  been  a  deliberate 
effort  to  modularize  the  program  through  the  use 
of  subroutines.  Each  clearly  definable  function  has 
been  prepared  as  a  subroutine.  This  technique 
makes  program  preparation  logical  and  also 
simplifies  later  program  modifications.  For  in- 
stance, after  the  tank  is  calibrated,  the  requirement 
to  take  End  Gauge  readings  is  unnecessary.  You 
may  therefore  delete  the  call  to  ihe.se  subroutines 
and  insert  the  gauge  coefficients  by  means  of 
algebraic  equivalents. 

As  illustrated  in  the  flow  diagram,  the  subrou- 
tine at  4.t00  reprints  the  gas  data  log.  The  gauge 
calibration  is  performed  by  sul^routines  1000,  2000 
and  1  100.  Subroutine  4()0()  prints  the  coefficients 
of  the  gas  gauge  ecjuation  with  the  exception  of  a 
constant,  AO.  The  gas  tank  calibration  table  is  also 
printed  with  the  assimiption  that  .40  is  zero.  This 


assumption  may  or  may  not  be  valid,  depending  on 
the  characteristics  of  tank  and  gas  gauge. 

An  important  feature  of  this  program  is  the 
method  used  to  calibrate  the  gas  gauge.  The  gauge 
is  assumed  to  vary  in  accordance  with  tlie  following 
cubic  expression: 

GL  =  A3  *  (GA)'  +  A2  *  (GA)'  -)-  Al  *  (GA)  +  AO 
where  GL  is  gallons  and  GA  is  the  gauge  reading. 

The  program  does  a  least  squares  curve  fit  to 
the  data  by  finding  coefficients  of  the  cubic  equation 
which  best  satisfy  the  data.  Tlie  gallons  added  to 
the  gas  tank  is  assumed  to  be  the  dilforeure  between 
the  values  of  the  above  cubic  equaiion  solved  at  the 
End  Gauge  reading  and  the  Start  Gauge  reading. 
That  is: 

AGAL  =  A3  *  (GA't  -  GA\)  +  A2  *  (GA'c  -  GA',)  -I- 

Al  *(GAe-GA,) 

where  ^GAL  is  the  gallons  of  gas  added  to  the 
tank  at  each  data  point.  GA.  is  the  Start  Gauge 
reading  and  GA^  is  the  End  Gauge  reading  at  the 
same  data  point.  The  value  of  .\0  is  not  computed, 
nor  is  it  needed  since  the  program  uses  only  the 
incremental  change  in  gallons  and  does  not  need 
the  absolute  number  of  gallons  in  the  tank  as  a 
funcuon  of  the  g:iuge  reading.  The  method  of 
least  squares  curve  fitting  will  not  be  described 
here,  but  it  is  available  in  standard  texts  such  as  ref 
I.  Essentially  this  technique  finds  coefficients  of 
the  equadon  such  as  to  minimize  the  difference 
between  the  gallons  recorded  in  the  data  table  and 
the  gallons  obtained  by  means  of  the  above  equaiion 
and  the  gauge  readings.  Since  three  coel  ilcients 
must  be  found,  at  least  three  data  points  will  be 
required.  Naturally  more  data  points  will  result  in 
a  belter  fit.  Please  note  that  the  equation  will  be 
best  in  those  areas  where  the  most  data  lias  been 
taken.  The  equaiion  should  not  be  irusted  in 
regions  of  ihe  gas  gauge  where  no  data  lias  been 
provided.  If  all  the  data  has  been  taken  on  the  low 
end  of  the  gauge,  the  equation  is  likely  to  be  inac- 
curate at  the  upper  end  of  the  gauge. 

The  subroutine  at  1000  sets  up  the  elements 
of  a  3  by  3  matrix  containing  various  surimations 
of  the  data  set  of  gauge  readings.  This  matrix  is 
referred  to  as  the  'matrix  of  the  .system'  or  simply 
the  system  matrix.  The  subroutine  at  2000  finds' 
the  determinant,  D,  of  a  3  by  3  matrix.  The  sub- 
routine ai  1 100  saves  the  determinant  of  the 
system  matrix  in  D2  and  sequentially  exchanges 
each  column  of  the  system  matrix  for  summations 
of  the  gallons  data,  B(K  I ).  The  determinant  of  the 
resulting  matrix  is  then  computed  at  lint  1 155  and 
ihc  corresponding  coefficient,  A(J  I)  is  ilien  deter- 
mined by  di\iding  by  D2.  Note  that  before  each 
c<jlumn  exchange  is  made,  the  original  svstem 
matrix  is  restored  at  line  1141. 

Results 

I  he  results  of  piogiam  operation  are  shown  m  the 
example  below.  The  program  first  reprniis  the 
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DR.  DALEY'S  BEST  Mailing  List  Is  Now  Better! 


DR.  DALEY  has  taken  his  best  selling  mailing  list  and  made  it  even  better!  This  version  has 
been  totally  revised  to  increase  the  reliability  of  the  files  and  make  it  even  easier  to  operate. 
Several  new  features  have  been  added: 


•  Goof-proof  input  routine.  Eliminates  the  irritating  results  of  accidentally  pressing 
some  cursor  control  keys.  This  is  a  machine  code  routine  so  it  is  as  fast  as  you  are! 
BONUS— Auto  repeat  on  all  keys! 

•  Interface  to  allow  output  of  the  entire  mailing  list  or  virtually  ANY  subset  to  WORD- 
PRO III  and  WORDPRO  IV  format  files  so  you  can  use  these  to  generate  personal- 
ized form  letters.  YOV  can  format  the  structure  of  this  output! 

•  Routines  to  merge  files  and  to  minimize  the  number  of  duplicate  entries  in  a  file. 

•  More  machine  code  routines  to  speed  up  processing. 

•  In  addition  you  have  the  same  powerful  file  formatting  options  where  YOU  can 
determine  the  structure  of  the  files.  YOV  can  format  your  label  output  with  up  to  11 
lines  per  label  and  from  1  to  8  (yes  EIGHT)  labels  per  line. 

This  system  is  completely  menu  driven.  It  includes  100  pages  of  user  documentation.  This 
documentation  is  for  the  end  user  and  is  not  padded  with  listings,  flow  charts,  and  other  such 
extraneous  material. 

This  program  will  be  available  for  a  short  time  at  the  introductory  price  of  $159.95.  It  is 
available  for  the  32K  PET  and  CBM  3000,  4000  and  8000  series  computers.  You  can  order 
through  your  dealer  or  directly  from  us.  We  will  accept  VISA  or  MASTERCARD  or  your  check 
or  money  order.  Overseas  orders  include  10%  to  cover  shipping. 


Charge  to 

your 

MC/VISA 


DR.  DALEY'S  Software 

425  Grove  Avenue,  Berrien  Springs,  MI  49103 

Phone  (616)  471-5514 

Sunday  -  Thursday  noon  to  9  p.m.,  Eastern  Time 
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input  data  in  a  form  similar  to  the  gasoline  log. 
Next  the  tank  equation  and  values  of  the  first  three 
coefficients  of  the  equation  are  printed.  If  you 
would  like  the  value  of  the  final  coefficient^  AO, 
simply  fill  the  tank  to  capacity  and  note  the  position 
of  the  gauge  reading.  Substitute  the  full  tank 
gauge  reading  into  the  equation  and,  from  your 
automobile  owner  manual,  set  GL  equal  to  the 
capacity  of  the  gas  tank,  The  value  of  AO  is  then 
determined  to  make  the  equation  balance. 

Following  the  gas  tank  equation,  the  program 
prints  a  table  relating  the  gauge  reading  to  the 
gallons  of  gas.  Note  that  this  table  is  useful  in 
obtaining  the  gallons  of  gas  added  to  the  tank  from 
the  differences  in  gauge  readings.  It  will  not 
provide  the  absolute  gallons  in  the  tank  as  a  function 
of  gauge  reading  since  it  is  offset  by  the  value  of 
AO.  If  desired,  you  may  modify  the  table  to  include 


this  value  by  adding  AO  to  the  equation  at  line  4015. 

The  program  now  prints  a  table  of  interme- 
diate results  consisting  of  the  consumption  between 
successive  mileage  entries  whose  difference  is  not 
less  than  the  specified  MINIMUM  MILEAGE 
INTERVAL.  In  this  example  the  minimum  allowed 
interval  was  150  miles.  You  will  note  that  the  data 
set  contained  entries  which  resulted  in  an  average 
interval  of  1 7 1 . 1 67  miles. 

Finally  the  program  prints  the  total  gallons 
and  the  total  mileage  of  the  data  set  followed  by 
the  average  miles/gallon  obtained  over  the  average 
mileage  interval. 

Reference 

1.)  McCracken,  D.  D.  and  Dorn,  W.  S.  "Numerical 
Methods  and  Fortran  Programming",  John  Wiley 
and  Sons,  New  York,  1964. 
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Ul 

4300 

1000 

2000 

1100 

4000 

-0 


LET    Hi-0 
LET    Z2-0 
LET    G4«- C[  HI. 
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n 

HI 
2] 


LET    T4-CCI 

LET    Sl«KCn 

LET    C1«0 

LET    G2 -A[  3  ]*T4«T 4*  T 4  + At  2  ]* T4 » T4 +AC  n*T 4 

LET    G4=G4+CtI/l] 

FOR    J=( 1*1 >    TO    Hi 

LET    G1  =  G1^G[<J-1  >/  1  ] 

LET    D5»Ht  J]-HC  11 

IF    <D5    <=    Ul )    THEN    380 

LET    T5'Cr'<J  >,2] 
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Now 

You  Con 

Subscribe  to 

COMPUTE! 

By  Calling 

TOLL-FREE 
800-227-1617,  Ext.  401 

In  California  Coll  800-772-3545,  Ext.  401 

MasterCardA/lSA  accepted 
Operators  Standing  By 
24  Hours  7  Days  A  Week 

This  is  an  order  line  only. 

Subscribers  with  questions 
about  ttieir  subscription 
should  call  919-275-9809 


WARNING! 

We  have  all  heard  that  nothing  you  can  type  in 
From  the  keyboard  can  liurl  the  computer.  Not 
completely  true. 

There  is  a  particular  POKE  which,  on  some 
CBM  computers,  risks  burning  the  screen  phosphor 
or  blowing  out  a  weak  component  on  one  of  the 
computer's  boards.  To  be  on  the  sate  side,  never 
POKE  59458,62.  This  poke  appears  as  line  130  of 
a  program,  "Epidemic,"  on  page  46  ol  the  May 
1981,  COMPUTE!.  The  intended  effect  —  speeding 
up  the  output  to  the  screen  —  might  cause  problems 
with  some  computers. 

COMPUTE!  mentions  this  danger  on  page  91  of 
the  January/February  1980,  issue.  Unfortunately 
the  early  issues  of  COMPUTE!  are  now  out  of  print. 

You  cannot,  with  absolute  accuracy,  comfort 
beginners  with  the  assurance,  "Go  alicad.  Nothing 
you  type  in  could  hurl  the  coinputer."  Ihis  POKE 
can  result  in  a  shrinking  of  the  size  of  the  display 
on  the  CRT  and  a  consequent  intensification  of  the 
phosphor  fluoresce.  Such  intensity  can  l)urn  the 
screen.  Associated  with  this  is  the  possibility  that 
components  inside  the  computer  might  be  damaged 
as  well.  Sometimes  a  faster  PRIN'i"  to  the  screen  is 
desirable,  but  this  can  be,  for  some  machines,  a 
damaging  way  to  achieve  it. 


CBM/PET  Computers  &  Such! 


Features  for  Jun/Jul  61: 

CALL  FOR  CURRENI 

PRICES  OK  CBK/PIT 

EOUIPHENT 

Cursor   Kagazine    (on   tape, 
specify   issues,    tfrile 
for   catalog)  10/J44.9i 


AFFORDABLE 
QUALITY 


Micro  Software  Systems 
BinboarS  for  803?   i 
Billboard  for  2001    i 


Cable.  PET-tEE£        i  3? 

Cable.  lEEE-lEEF       i  47 
Modem  +  terminal  softwares  279 

NEC  ipinxritsr  (5530  SZ69S 

Xymec  typewriter/printer  S2499 

Epson  HX-80  i    499 

Watanabe  HIPLOT  J1H9 

Uncrasher  for  2000/4000  t   15 

*•  NEK  *•    for  B03?  i       25 


Hsavy  duly  StLECTRIC  15" 
reconditioned  Printer 

vilth  ESCOM  interface  for 
PEl/CBH      (1195 
IRS-eO        J  995 
APPLE        51195 
RS-23?       S1025 


C0KHEC1  PEt/CBK  iO  PRtMlER:  Simply  plug  in  the  interface  and 
use  your  PET/CBH  computer  with  popular  "standard"  prirvters, 
or  add  video  monitor  for  second  display.  All  interfaces 
assembled,  tested,  waranteed.   No  software  required. 

TU-65C  Use  NEC,  Centronics,  Xyiiec,  or  other  industry 
standard  parallel  printers.  Works  with  disk,  other  IEEE 
devices  attached S129.95 

TU-6SU  Use  RS-232  (serial)  printers,  like  lleathkit  H-14. 
300-4BO0  baud  (specify  rale  desired).  Includes  power 
pack.   Not  for  use  with  other  IEEE  devices.. 579.95 

TU-PVE  Connect  your  Video  Honitor  to  PET/CBM  for  second 
display.  Our  unique  contact  extensions  leave  the  user 
port  available  for  connection  of  other  accessories  (HOI 
for  80321 J39.95 

FSCOK  Interfaces: 

SELECTRIC  to  PET/CBH 

SELECTRiC  to  Apple,  TRS-80:  Parallel 

StLECTRIC  to  Apple,  TRS-80:  RS-232  Serial 

HTST-1/0   to  Parallel 

Cables  eatra,  S20  to  S90.  Installat 


te49 

{549 
t579 
St25 
tlOO 


Virginia    Micro    Systems     Jl^f^^J  .^J,  " 


]441S  Ji>rr«i&Dn 


22191 


n03l  49I-6S02 


sales   &   service 
HWF    12-E.Sa    9-3 


COMPUTERS  Book  Corner 

Back  Issues: 

COMPUTE!  January,  1981,  Issue  8 S2.50  D 

COMPUTE!  February,  1981,  Issue  9 $2.50  D 

COMPUTE!  March,  1981,  Issue  10  $2.50 D 

COMPUTE!  AprlU981,  Issue  11  $2.50  D 

COMPUTE!  May,  1981,  Issue  12  $2,500 

COMPUTE!  June,  1981,  Issue  13 $2,500 

For  The  Single  Board  Computer  Owners: 

(KIM,  SYM,  AIM,  OSI] 

COMPUTE  II,  #2  $2.00n 

Miscellaneous: 

Best  of  the  PET  Gazette $10,00D 

[Note...an  old  anthology  primafily  for  old  ROM,  8K  original  PETs.) 

Collected  PET  User  Notes  (7  issues) $10,000 

(Above  note  opplies) 

Collected  6502  User  Notes  (17  Issues)  $20.00  D 

(Specificolly  for  Single-Board  Computer  Owners) 

Ordering  Information: 

Address  orders  to: 
Compute's  Book  Corner 
P.O.  Box  5406 
Greensboro,  NC  27403  USA 

Paymerit,  in  US  funds,  required  witti  order,  MasterCardA'lSA  occepted. 

All  itefns  subject  to  availability.  Please  add  the  following  Qmount(s)  for 

shipping/handling: 

US  S2.00  (UPS  or  moil]  •  Conado  $2.00  (moil)  •  Foreign  Air  Mall  S5.00 
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240  LET  C3  =  Ar  3]*T5*T5*T5*AE2  ]*TS*T5*-Ar  I  ]*T5 

342  LET  Gl=Gl+G2-C3 

343  PRINT  "  3T  M  I  :  "  !  «t  I  ]  J  "  EWO  HU'.'MEJ];"  GALi"JGl;"  MI  ^-GAL  i  '  ;  D5/G  I 

346  LET  22»Z2+DS 

347  LET  Hl=Hl+l 

348  LET  Z3  =  Z3  +  l>5/'Gl 
350  GOTO  390 

380  NEXT  J 

390  NEXT  I 

395  LET  Tl-G[l,2} 

396  LET  G4-G4  +  At3]*Tl«iTl*Tl+Ar2]*Tl*TUAC  I  1*T1-G2 

397  LET  24»«[ni  ]-Mt  I  1 
410  IF  (HliO  >  GOTO  440 

420  PRIHT  •  IHSUF.  DATA  OR  INTERVAL  TOO  LONG" 

430  GOTO  2S4 

440  PRINT 

450  PRIHT  ■   TOTAL  GALJ";C4;"   TOTAL  MILESi';Z4 

480  PRINT  •  AVE  N ILES/GAL t • ; ( Z3/N  1  ) 

490  PRINT  '  OVER  AN  AVERAGE  INTERVAL  OF  :  "  J < Z2/N  1  )  ;  "« IL ES" 

495  STOP 

500  R cn *<< ****>******«■** *4>*  «>*  *>*«>*****  *                               I 

1000  REM!     SUBROUTINE     "MATRIX     " 

1002  REM!     THIS    SU8R0UTINE    SETS    UP    THE    ELEMENTS 

1003  REM!     OF    THE    GAS    TANK    MATRIX. 

1004  REM 

1010  FOR    J=l     TO    3 

1015  LET    BCJ  1»=0 

1020  FOR    Kal    TO    3 

1025  LET    Ct J, K]=0 

1027  NEXT    K 

1030  NEXT    4 

1035  FOR     1=1     TO    Ml 

1037  FOR    J=l     TO    3 

1040  LET    0[  J3=Gt  I,  3]"J-G[  I  ,2]^J 

1045  LET    BC J ]*BC J  ]  +  0[ J]*Gr  I,  n                                                   , 

1030  NEXT    J 

1060  FOR    K«=l     TO    3                                                    '                                   , 

1065  FOR    L*l    TO    3 

1068  LET    CI  K,  L]  =  Ct  li:,L]+DtK  }*D[L] 

1070  NEXT  L                                        ; 

1075  NEXT  K 

1080  NEXT  I 

1090  RETURN 

1100  REM.  ..  .SUBROUTINE  "  COEFFICIENTS" 

HOI   REM THIS  SUB  GETS  THE  COEFFICIENTS  OF  THE  EQ 

1102  LET  D2=D 

1140  FOR  Jl=l  TO  3 

1141  GOSUB  1000 

1145  FOR  Kl=l  TO  3                                 i 

1  146  LET  CI  Kl  ,Jl  ]  =  e[  Ki  ] 

1150  NEXT  Kl 

1155  C0SU8  2000 

1160  LET  A£J  1  ]  =  0/'D2 

1162  NEXT  Jl 

1170  RETURN 

1190  REM  

2000  REM!  SUBROUTINE  '  OE TERM  I N AN T " 

2002  REM  THIS  SUBROUTINE  FINDS  THE  DETERMINANT  OF  THE 

2003  REM  MATRIX. 
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Announcing: 

COMPUTEI's 

FIRST 
BOOK  OF 
PET/CBM 

Since  our  first  issue  in  the  Fall  of 
1979,  we've  provided  more  PET/ 
CBM  information  to  owners  and 
users  than  any  other  magazine  in 
the  industry. 

Now  we're  taking  the  best  of  our 
published  material  adding  new 
material,  and  putting  it  all  together 
into  our  first  special  PET/CBM  book; 

COMPUTEi's  First  Book  Of  PET/CBM 

will  be  available  in  late  July.  With 
a  design  intended  to  make  it  easy 
to  use,  and  contents  aimed  at 
assisting  a  range  of  users  from 
beginners  to  advanced,  you'll  find 
that  COMPUTE!  Books  will  become 
a  valuable  and  permanent  addi- 
tion to  your  reference  library,  But 
what  else  would  you  expect?  After 
all,  we're  the  resource. 

Reserve  your  copy  today  at  your 
COMPUTE!  dealer,  or  if  one's 
not  handy,  use  the  coupon  below 

to  order, 


We  accept  Master  Charge  and  Visa 
Dealer  Inquiries  Invtted 

PETjCBM"  1rc3demark  of  CommcxJore  Business  Mochines.  Inc- 


r: 


Please  send  me 


.copy(5)  of  COMPUTEi's  First  Book 


Ot  PET/CBM  (a  $12.95  each. 


Name. 


Address  _ 
City 


.  State . 


.  Zip_ 


Please  add  $2.00  for  postage/handling  for  each  book  ordered. 

Payment  must  be  in  US  funds,  31,00  billing  fee. 

All  orders  from  outside  US  and  Canada  must  be  prepaid. 


COMMODORE 
COMMODORE 
COMMODORE 


Z.E.P.  is  pleased  to  announce  Immediate 
availability  o1  integrated  business  programs 
(16)  for  all  Commodore  drives.  Sixteen  (16) 
programs  will  process  any  small  business 
accounting  needs. 

We  have  recommended  business  software 
programs  for  Commodore  systems  (8050, 
4040,  2040).  f\i1ost  private  firms  in  the  United 
States  need  this  totally  integrated  application 
software.  Call  us  today. 

Available  for  all  types  of  businesses  and  you 
can  own  the  programs. 

All  programs  are  w/ritten  in  microsoft  basic 
which  employs  the  "relative  file"  disk 
operating  system  by  task.  Totally 
integrated!! 

8050  disk  drive  parameters  <2  diskettes) 
General  Ledger  Accounts  ,.. 

190  System  Selected  Accounts 
65  User  Designaled  Accounts 

Accounts  Receivable 1044  Accounts 

Accounts   Payable 174  Accounts 

Inventory  Items 4440  Hems 

Payroll  87  Employees 

Depreciable  Assets  ..,,.,..  56  Accounts 
Individual  Notes  and  Loans  . .  56  Accounts 
Otfier  Program  Paris 

Totally  supported  nationally-guaranteed  sup- 
port in  writing  with  exclusive  dealer 
agreements. 

Unconditional  guarantee  for  your  territory.  You 
can  own  the  programs.  Call  us  today  (404) 
289-2265  or  (404)  289-1596 


ZciglGr  clGCtronic  product^ 


COIMPUTER  SUPPLiES 


3661  Calumet  Road  •   Decatur,  Georgia  30034 
Phone  (404)  289-2265 


66 


COMPUTEI 


July.  1981,  Issue  14 


200S 

2006 

2007 

2008 

2009 

2010 

201  1 

201S 

2016 

4000 

4001 

4002 

4003 

4004 

4003 

4010 

4011 

4012 

4013 

4015 

4016 

4017 

4020 

4030 

4030 

4051 

4052 

4500 

4301 

4502 

4503 

4504 

4505 

4506 

4507 

4510 

4S1  i 

5000 


LET  Ft  I  l  =  Cl2,2  1*CC3i  I  ]-C[ 2,  I  ]*C[ 3, 2] 
LET  Ft2]  =  -C[  1,  2  J*C[3,  1  ]+C[  1  ,  1  J*CC3,  2] 
LET  F[3  3  =  C[1.2]*C£2,l]-CC2,2]*CCl,l] 
LET  0«0 

FOR  y=l  TO  3 
LET  0=1)  +  FC  y3*CC  «,  3  3 
NEXT  U 
RETURN 

REM 

REM 

SUBROUTINE    "PRINT    TANK    CftLIBRATIOH" 
TANK    EQbATIONi " 

GL    =    A3*<GA)''3     +    A2*(GA>*2    +    A1*(GA) 
A3  =  "JAE3];"       A2  =  ";A[2];'       Al  =  ';Atl] 


GAUGE 


GAL 


2+AI 1  ]*R1 


RErli 

PRINT 

PRINT 

PRINT 

PRINT 

PRINT 

LET    Rl»0 

LET    R2=.2 

LET    R3='4 

LET    G-AE3  ]*81^3  +  A[2 ]»R1 

PRINT    TAB<  2>; Rl /G 

LET    Rl=Rl+R2 

IF  <  R1>R3)  THEN  4050 

f.OTO  40  15 

PRINT 

RETURN 

REN 

REM 

REK  SUBROUTINE  "IHPUT  DATA" 

REH  THIS  PRINTS  THE  INPUT 

PRINT  ■   HILES  GAL 

FOR  1=1  TO  Ml 

PRINT    TAB<2>;Ht  n,CC  I.  1  ],Ct  I,2  3,Gt  1/3  1 

NEXT     I 
PRINT 
RETURN 

REH 

EHO 


AO 


DATA 
ST 


GAUGE 


END  gauge: 


CANYON 
BOMB  RUN 

Introductory 
Offer :  «6.« 


Tifi  TO  CLEAH  A  CAN  ION   OF   BOULDEHS   Bi 
B0H3IW0   TH£H  FROK   lOUH  THREE   TYPES 
OF  AIRCRAFT.   VEfli   £A3K  TO   PLAlt.    BUT 
IT'S   TOUGHER  THAN   IT  LOOKS! 

Clip  VERSION    INCLUDES  COLOR  1  SOUND- 
CIP  INCLUDES  SOUND!    (MODEL   II   OWNEBS 
TAKE  NOTEr ) 

■"•PLEASE  SPECIFY    YOUR   SYSTEM !••• 

SAVE   *1.00    By  OHDERISC  NOW.    OH    WHITE 
FOR  FREE  CATAL03 

A3    USUAL,     POSTAGE    IS    FREE!     (ON    ALL 
PREPAID    ORDERS] 

BOB  RETELLE 

Pretzelland    Software 
2005  A    WHITTAKER  RD. 
YPSILANTI,  MI.4S197 


Using  yoL/r computer 

in  an  interesting 

application? 

Write  it  up  for 

other  COMPUTE! 

readers  to  use. 
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Standard  Features: 

•  Full  power  to  PET/CBM  for  a  minimum  of 
15  minutes 

•  Installs  within  PET/CBM  cabinet 

•  No  wiring  changes  necessary 

•  Batteries  recharged  from  PET/CBM  inte- 
gral power  supply 


Specifications: 

•  Physical  Size:    5  5"  x  3  6"  x  2  4" 

•  Weight:    4.5  lbs. 

•  Time  to  reach  full  charge:    16  hours 

•  Duration  of  outputs:   Minimum  of  15  min. 

•  Voltages:    +16,  +9,  -12,  -9 

•  Battery  Life  Expectancy:    3  to  5  years 

•  Battery  On-Off  Switch 


For  Use  With: 

•  Commodore  PET/CBM  2001  and  4000  ser- 
ies computer 

•  Commodore  PET/CBM  8000  series  com- 
puter (screen  size  will  not  be  normal  on 
battery  back-up) 

•  Commodore  C2N  Cassette  Drive 


BATTERY 

BACKUP 

SYSTEM— 

FOR  COMMODORE  PET/CBM  COMPUTERS 


Never  again  lose  valuable  data  because  of 
power  shortages  or  line  surges.  BackPack  sup- 
plies a  minimum  of  15  minutes  reserve  power  to 
32K  of  memory,  the  video  screen  and  tape 
drive.  BackPack  fits  inside  the  PET/CBM 
cabinet  and  can  be  installed  easily  by  even  the 
novice  user.  BackPack  is  recharged  during  nor- 
mal operation  and  has  an  integral  on-off  switch. 

Backpack  comes  fully  assembled  and  tested. 
Instructions  included. 


Backpack  is  a  trademark  of  ETC  Corporation 
CBM/PET  are  trademarks  of  Commodore  Business  Machines 


Designed  and  manufactured  by: 

ELECTRONIC  TECHNOLOGY  CORPORATION 

P.O.  Box  G,  Old  N.C.  42 

Apex,  North  Carolina  27502 

Phone:  (919)362-4200  or  (919)362-5671 


Electronic  Manufacturing 

Technical  Design  and  Development 

Compute-"  System  Technology 


mil iiiniiiiiiiiiii 


ELECTRONIC  TECHNOLOGY  CORPORATION 
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Intermediafe  BASIC  Tutorial: 

How  To  Make 
Conversation 
With  Your 
Computer 

John  Victor 
Greenwich,  CT 

Computer  programs  that  appear  to  have  conversa- 
tions with  humans  have  fascinated  computerises 
and  non-computerists  alike.  Most  of  these  programs 
focus  on  key  words  to  determine  the  computer's 
reply. 

For  example,  there  is  a  popular  computer 
program  that  simulates  a  psychiatrist.  When  the 
"patient"  types  in  an  answer  to  a  question  such  as 
"what  is  the  matter  with  you?",  the  program  analyzes 
the  typed  answer  for  words  such  as  father,  mother, 
sex,  etc.  If  key  words  are  found,  the  program  then 
produces  a  canned  response  such  as  "tell  me  more 
about  your  mother,"  or  "does  talking  about  sex 
bother  you?" 

Simple  conversational  programs  can  be  written 
using  the  string  manipuladon  features  of  Atari, 
Apple,  PET  or  OSI  BASIC.  The  techniques  allow 
you  to  look  at  any  string  of  characters  for  certain 
words  that  may  be  present  in  the  string. 

First,  let's  look  at  some  of  the  fundamentals  of 
string  logic.  We  can  write  a  BASIC  statement  to 
compare  two  strings  of  characters; 

IF  A$  =  "YES"  THEN  GOTO  100 
The  computer  will  look  at  the  string  stored  as  A$ 
and,  if  it  matches  "YES"  it  will  go  to  line  100. 
However,  if  there  is  any  variation  at  all,  the  com- 
puter will  consider  the  two  strings  as  not  matching. 
For  example,  if  A$  contains  "YES  I  DO,"  or  even 
"YES  "  or  "  YES"  (note  the  extra  space)  the  com- 
puter will  consider  lliis  as  not  matching  "YES". 

Programmers  often  ask  program  users  to  type 
in  YES  or  NO  responses,  but  thev  do  not  really 
care  if  the  program  u.ser  can  spell.  The  only  thing 
that  concerns  them  is  the  first  letter,  the  Y  or  the 
N,  that  indicates  the  user's  intent.  In  Microsoft 
BASIC  the  programmer  can  get  around  the  prob- 
lem of  the  user's  input  by  using  the  MID$ 
function. 

INPUT  A$ 

IF  MID$(A$,1,1)  =  "Y"  THEN  GOTO  100 

The  First  number  indicates  what  character  the 


computer  is  going  to  start  with.  Here  the  computer 
is  to  start  with  the  first  character.  The  second 
number  indicates  how  many  characters  over  the 
computer  is  going  to  look  at.  Here  the  computer  is 
to  look  at  jusl  one  character.  In  the  above  statement, 
no  matter  what  the  user  types  in,  if  the  first  charac- 
ter is  a  Y,  the  program  will  go  to  line  100. 

Atari  BASIC  works  a  little  differently.  MID$  is 
not  used.  Instead,  the  same  operation  is  clone  like 
this: 

INPUT  A$ 

IF  A$(1,1)  =  "Y"  THEN  GOTO  100 

The  first  number  here  represents  the  first  character 
to  be  looked  at,  but  the  second  number  does  not 
indicate  the  number  of  characters.  Instead,  it  is  the 


...  some  of  the  fundamenlals 
of  string  logic. 

position  of  the  last  character  to  be  looked  at.  Since 
the  first  and  the  last  character  are  both  1 ,  the 
computer  will  only  look  at  one  character. 

The  MID$  function  can  be  used  to  find  strings 
inside  a  larger  string.  For  example,  we  cm  store  a 
list  oi  three-letter  words  in  a  string  variable  (rather 
than  using  DATA  statements): 

A$  =  "DOG  CAT  RAT  SAT  GET  KIN  FIN  SUN  RUN" 

MID$(A$,9,3)  will  give  us  the  three-letter 
word  starting  with  the  9th  character,  which  is  the 
word  RAT.  (Spaces  count  as  characters). 

We  can  now  set  up  a  FOR-NEXT  loop  that  will 
print  all  of  the  three-letter  words  in  the  siring; 

10      DIM    H*<40> 

20   fl*    =    "EJiJG   CRT   RHT    SflT   GET  KIN 

FUN    SUN   RUN" 
2:e      FCfR    M    =   1    TO   sZ    STEP   4 

40  PRINT      mOS    CR^..  W..  j:> 

41  REM  HTRRI    version 

—    40    PRINT    iit'-M..  N+2? 
5F1      NEXT    W 

When  the  loop  starts,  W  equals  one  and  the 
equivalent  of  MI DKA-1, 1,3)  is  primed.  Next,  W  is 
made  equal  to  five  and  the  equivalent  of 
MID$(A$,5,3),  the  word  CAT,  is  printed. 

We  can  change  the  above  program  to  work  for 
any  length  siring  stored  in  A$  by  using  tlie  LEN 
function.  LEN(A$)  gives  us  tlie  number  of  charac- 
ters in  A$.  The  following  will  count  to  the  end  of 
A$,  no  matter  what  its  length: 

30  FOR  W  =  1  TO  LEN(A$)-2  STEP  2 

The  minus  2  allows  for  the  last  two  letters  in 
the  ibree-leller  word. 

In  the  following  example,  we  will  take  the 
process  one  step  further.  We  will  ask  the  program 


SAN  MARTIN,  CALIFORNIA  95046 


THE  FINEST  IN  FANTASY  GAME  SOFTWARE 


48K  -  w/disk 


48K  -  w/disk 


32K  -  w/disk 


TRS-80 

48  -  w/disk 


SPACE  GAMES  -  cilmt)  aboard  the  Starship  Herman 


GALACTIC  QUEST  -  Warp  through  the  64  solar  systems  in  Hires  graphics  with  Crystalsonlcs  sound.  Fire 
lasers  and  rifter  pods  as  you  battle  the  Vegans  in  real  time  simulation.  In  Galalic  Quest  u/e  have  attempted  to  combine  the 
best  elements  of  a  Star  Trek  type  game  with  one  similar  to  Space  Trader.  What  is  Skishi  and  where  is  the  Pleasure  Planet? 
In  some  systems,  lurking  behind  swarms  of  asteroids,  are  Space  Pirates  who  will  gul  your  ship  and  leave  you  a  derelict  in 
space.  To  win  Galactic  Quest  you  must  be  shrewd  a  business  man  as  well  as  a  top  notch  warrior.   $29.95 

LASAR  WARS  -  Attacking  aliens  in  3D.  Thousands  of  approach  simulations  and  10  levels  of  difficulty.  Three 
kinds  of  invader  craft  scored  by  size  and  attack  mode.  An  exciting  Invaders  type  game  with  perspective  and  sound.  For 
fantasy  enthusiasts  from  8  to  80.   $29. 9S 

SANDS  OF  MARS  -  You  embark  on  the  Maiden  Voyage  of  the  Starship  Herman.  This  game  lakes  up 
almost  200K  and  uses  2  disks.  It  includes  more  than  300  Hires  screens  animated  scenarios,  a  3  dimensional  maze,  and  a 
Martian  labyrinth  drawn  entirely  with  hexagons.  The  takeoff  and  landing  sequences  are  paddle  or  joystick  controlled  for 
the  Apple  and  Atari  and  the  game  has  5  full  scenarios.  Once  you  land  on  Mars,  you  wander  through  fields  of  Sasquali  and 
Dcgwat.  Beware  of  the  Vishu  and  the  Lizardmen  of  Meshim.  Seek  (he  wise  Mudra  and  unlock  secrets  hidden  for  cen- 
turies. Glyphs  written  on  the  Martian  Sand  hold  the  key  lo  the  mystery  for  which  we  offer  $100  to  the  first  lo  solve  il.  To 
answer  a  question  we  have  been  asked  many  times  —  yes.  Sands  of  Mars  attempts  lo  fully  utilize  the  sound  and  graphics 
capabilities  of  the  Apple  and  Atari  lo  their  max'    $39.95 


ADVENTURES  -  cross  tne  threshold  to  new  worlds. 

HOUSE  OF  USHER  -  Walk  Ihe  dreaded  corridors  of  the  deadly  House  of  Usher.  Complete  with  40  rooms 
and  hundreds  of  aggressive  monsters  and  unique  treasures.  This  is  not  your  typical  text  adventure  game  but  goes  lar 
beyond  that,  with  animated  monsters  and  a  visual  display  of  each  room.  We  believe  this  lo  be  the  first  indoor-outdoor 
game  ever  written  for  a  microcomputer  game  which  includes  graphics.  You  may  choose  to  wander  through  Usher's 
scenic  garden  paths  or  brave  the  perils  of  the  graveyard  and  descend  into  the  crypt.  Beneath  the  house  there  are  laby- 
rinths, shrinking  rooms,  and  torture  chambers  with  no  doors  or  windows.  Your  character  may  pick  up.  drop,  or  use  ob- 
jects, fire  arrows,  or  run  frantically  for  the  door  when  pursued  by  some  loaihsome  creature.  As  the  old  grandfather  clock 
licks  away,  you  will  have  until  dawn  to  solve  the  Usher  Mystery  and  win  a  real  live  $100  prize!    $24.95 

IMPERIAL  WALKER  IATARI  16K)  -  For  you  Atari  people  out  there,  here's  a  fantastic  game  pack  of  4  games  with  revolutionary  new 
graphics  routine  and  Cryslalsonics.  As  Luke  Skywalker  you  have  taken  control  of  an  All  Terrain  Armored  Transport  and  with  your  lasers  are  fendmg  off  the 
Imperial  attack  forces.  Written  especially  for  Atari  by  Mike  Potter.  The  game  pack  also  includes  Laser  Nim,  Auto  Race,  and  Gunfighl.  Will  run  on  Alan  400 
or  800  with  disc  and  Joysticks.    $29.95 

F  AN  T  AS  Y  LAN  D  204 1  (Commg  June  1 )  -  Step  with  us  through  the  Crystal  door  into  (he  world  of  tomorrow's  fantasy.  In  the  great  Oulback 
of  Australia  in  the  year  of  204 1 ,  will  be  built  Ihe  greatest  Adventureland  of  all  time.  Through  your  computer ,  you  can  experience  six  separate  worlds  of  fantasy .  These 
programs  will  lake  up  more  than  500.000  bytes  of  memorv  and  fill  6  disks.  Many  of  the  options  may  be  (>layed  by  up  to  six  players  and  in  many  cases  against  Ihe  com- 
puter itself.    $59.95 


WAR  GAMES 


WORLD  WAR  III  -This  Is  a  three  scenario  war  gaiHe  in  Hires  graphics  with  sound.  It  Is  not  merely  the  con- 
version of  a  board  game  to  computer,  nor  are  your  pieces  represented  by  lifeless  text  charcters.  It  may  be  played  by  two 
persons  and  takes  about  8  hours  to  complete.  The  rules  are  simple  enough  that  you  won't  have  lo  spend  several  days 
reading  your  manual  before  you  can  play.  It  contains  2  world  maps  and  a  fairly  detailed  map  of  Ihe  Iran-Iraq  battle  field. 
All  scoring,  animation,  and  positions  are  handled  by  the  computer  —  no  separate  (ablets  lo  fool  with.  Moves  are  input  by 
both  players  in  series  of  3  and  when  the  space  bar  is  pressed  the  battle  becomes  animated.  A  must  see  to  believe  .... 
$29.95 

WATERLOO  (Coming  July  1)  -  A  war  game  with  graphics  very  similar  lu  World  War  111.  We  have  altempted  lo 
make  (his  as  detailed  as  possible,  down  (o  wha(each  individual  is  wearing,  his  line  of  sight,  and  the  number  o(  bullets  he 
has  fired.  It  will  occupy  two  disks  and  may  be  saved  over  a  period  of  weeks.  We  will  be  publishing  more  information  on  this 
in  BYTE  MAGAZINE  in  July.  $49.95 


order  line  open  24  hrs  /  day  (408)  683-0696 


We  accept  VISA  &  Maslercharge 
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user  to  type  in  a  string  ot  words,  and  we  will  look 
for  one  word  from  that  string. 


10      DIM  f\-$(A£0 

20   PRINT  :  PRINT  "TVPE  IN  R  SENT 
ENCE.  " 

25  PRINT  :  PRINT 

26  INPUT  H* 

27  PRINT 

28  FOR  W  =  1  TO   LEM  <R*;'  -  2 

40  IF  ril[>*  tfl*..  W.  j::>  =  "THE"  THEN 

PRINT  "VOL!  USED  THE  WORD  -T 
HE-":  ENL> 

41  REM  RTRRI  VERSION  US 

ES  H^f  N..  LJ-^^;:'  =  "THE" 
50   NEXT  N 
60   PRINT  "VOU  DID  NOT  USE  THE  WO 

RD  -THE-".  " 

In  the  above  program,  the  computer  looks  at 
every  three-letter  group  starting  with  the  first 
character,  and  moving  over  I  on  each  count  of  W. 
If  THE  is  found,  the  program  will  prin(  the  ap- 
propriate message  and  stop  the  program.  If  not, 
the  loop  continues.  Now  for  our  final  example. 
The  next  two  programs  illustrate  a  convensational 
technique  whereby  the  computer  user  is  asked  a 
question,  and  the  computer  analyzes  the  answer 
for  certain  key  words. 

1  REM   HppLE  VERSION 

2  DIM  H$<40> 

5   DflTfl  BRD..  LOUSV..  HWFUL..  TERRIBLE 

-■  NOT  GOnr;!..  f-jOT  TOO  GOOD..  NOT  V 

ERV  GOOD..  NOT  WELL 
20   TEXT  ;  HOME  ;  REM   CLERR  SCRE 

EN 
PRINT  :  PRINT  :  PRINT 
PRINT  "HOW  RRE  VOU  TODfiV?" 
INPUT  R* 
FOR  V  ^  1  TO  S 
RERD  Bt- 
FOR  C  =  1  TO   LEN  CftJJ  -   LEN 

<B*>  +  1 
IF  E*  =   MIDf  cfif,  C,  LEN  eB*> 

>  THEN  100 
NEXT  C 
NEXT  V 

PRINT  :  PRINT  "I-M  GLAD.":  END 
PRINT  :  PRINT  "THRT-S  TOO  BR 
D.  .  .  .  "  :  END 


2-5 
26 

20 
4@ 


~Pfk 
1     ^. 

S0 


1  REM  hTARI  UERSION 

2  DIM  rtS'::40>..B$(20J 

5  DATA  BAD.-LOUS't".  AwFlLjiERRIBLE..  1-IjT  TOO 

GOOD..  NOT  QJjD.-NQT  UERV  GOOD ,=  MOT  I'iELL 

20  GRhPHICS  0 

25  PRHsT  ^PRINT  ^PRINT 

2b  PRINT  "HOW  ARE  YOU  TODhV?" 

27  INPUT  H$ 

30  FOR  U=l  TO  S 

48  READ  Bt 

50  FOR  C=l  TO  LENCA$)-LEH'::Bir)+l 

55  IF  LEH<:A*)-LEN(BJ)<0  THEN  SO 

60  IF  B*=A$(C.C+LEN'^B$j-l>  THEN  IfiO 

70  NEXT  C 

Sy  NEXT  I..! 

90  PRINT  ^FkINT  "Til  GLAD."^EHu 

190  PRINT  ^ PRINT  "THAT'S  TOO  BAD    ":EN 

D 

Lines  SO  to  80  establish  a  nested  loop.  On  each 
(urn  of  the  outer  loop,  a  key  word  or  |)hrase  is  read 
into  B$  from  a  DATA  line.  The  inner  loop  then 
tries  to  find  the  key  word  in  the  string  typed  into 
A$  by  the  program  user. 

Line  50  sets  the  number  oftinns  of  ;he  inner 
loop  equal  to  the  length  of  the  siring  typed  in  by 


There  are  certain  problems 
inherent  in  these  types  of  programs. 


the  user,  minus  the  length  of  the  key  word.  This 
will  allow  the  computer  to  try  every  group  of 
letters  in  the  string  that  could  possibly  match  the 
key  word. 

In  line  60  LEN(B$)  replaces  a  constant  in  the 
MID$  statement  because  different  key  words  of 
different  lengths  are  going  to  be  stored  in  B|.  If 
the  key  word  is  found  in  A$,  line  60  sends  the 
program  to  line  100.  If  not,  the  next  key  word  is 
read  into  B$  from  DATA  and  the  outer  loop  turns 
one  more  time.  If  no  key  words  are  found,  the 
program  ends  in  line  90. 

There  are  certain  problems  inheiem  in  this 
type  of  program.  The  first  is  that  all  possible  key 
words  must  be  accounted  for  or  the  program 
messages  will  not  be  a|)pt-opriate.  In  our  example, 
if  the  program  user  typed  in  I  FEEL  BLAH,  the 
program  would  not  recognize  BLAH  as  a  key 
word.  Another  possibility  is  thai  the  program 
might  misinterpret  another  word  as  a  kev  word. 
For  example,  I  FF.F.L  AWFULLY  GOOD  is  inter- 
preted in  the  negative  since  the  wortl  AWFUL  is 
imbedded  in  the  string.  However,  even  with  its 
limitations,  this  .sort  of  programming  is  both 
interesting  to  write  and  fun  to  use.  © 
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PETTERM 


TM 


Terminal 
Program 


Use  your  PET  as  an  intelligent  terminal.  Access  timeshare  systems 
and  networks  such  as  the  Source  or  Telenet.  This  is  an  Interrupt  driven 
system  with  buffered  input/output.  Unlike  dumb  terminals,  the  PET 
can  do  other  tasks  instead  of  having  to  v/ait  for  incoming  data.  This 
flexibility  allows  many  advanced  features. 

These  are  complete  assembled  hardware  and  software  pa-kages. 
All  include  line  editing/resend,  auto-repeat,  shift  lock,  output  to  IEEE 
printer  and  much  more.  Delivered  on  cassette  or  disk.  Also,  available 
for  Commodore  8010  modem  or  Livermore  Star  488  modem. 


Infelligenf   CommunicaHon 


Uploads   and  Downloads 


In  Machine  Language 


PETTERM  I  All  leatures  above 

PF.TTERM  II  All  features  of  I,  plus  local 
text  editor  witin  down-loadmg  capability 
PETTERM  III  All  teatures  of  II,  plus 
80  132  column  scrolling  window  for 
viewing  fomnatted  outputs  wider  than 
40  columns    .    .      


$  80.00 


90.00 


100.00 


FORTH 


'^''ogramming  J^ 


«voiiif,on 


FORTH  Interactive  hiigh  level  compiler  and 
operating  system  5-10  times  faster  than  PET 
BASIC.  Highi  level  block  structured  language. 
This  IS  a  true  fig-FORTH  implementation  for  15  and 
32K  PETs- 


ftg-FORTH.  with  editor,  assembler S50.00 

with  floating  point  and  strings   S60.00 

with  floating  point,  strings,  macro-assembler  . .  S70.00 
cassette  and  disk  interface  available. 


DEALERS  INQUIRE 


►o-p-buj.air^e'     -Fot~ 


1903   Rio   Grainde 
flustinj  Jsxss 
7870S 


1-512-477-2207 
Source:  TCE995 


XI     <sonrt»ou-te.|~; 


P.O.    Fox      8403 

Rustin^TvxAs 

78712 


V/S4- 
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THE  STAR  MODEM 

From  Livermore  Data  Systems 


RS232  MODEM 
IEEE  488  MODEM 

RS232  CCin 
IEEE  488  CCITT 


SALE  $135 
SALE  $199 

$170 
$280 


STAR  Modem  Is  the  price  performance  leader  with  a  full 
2  VEAR  FACTORY  WARRANTY, 


We  carry  Apple  11+  from 
Bell  &  Howell 


REVERSAL  (Spracklen)  32K  Apple  28.00 

Super  FORTH  48K  Apple  40.00 

Energy  MiSEf  for  PET.  Apple,  or  Zenitti  24.50 

Data  Manager  (Lutus)  24K  Apple  40.00 

Histo-Grapti  (Boydl  48K  Apple  24.50 

Dala-Grapti  (Boyd)  48K  ApfJe  40.00 

Apple  II  User's  Guide  (OsOorne)  12.00 

Introduction  to  Pascal  (Sybex)  1030 

Pascal  Handtxx)l<  (Sybex)  1 2  QQ 

Grapliics  Cooktxxjk  for  Apple  9.90 

Musical  Applications  of  Micros  (Ctiamberlin)  20.00 

Basic  FORTRAN  (Coan)  7.25 


PROGRAM  YOUR  OWN  EPROMS 

Bnndlng  Iron  lor  PET/CBM  t79 

EFHOM  Pntfimiiiir  wltk  Mitnn  fir  ill  ROM  nnliiL 
licJidit  III  Hciuiiy  kiidnti  iti  nftnra  li  truna  u 
OH  Z71E  ui  Z532  EFHOMS. 

WORDCHAFT  SO  Won!  PnicoHor-CBM  $30D 

Extremely  compretienslve  wixd  pfocesstng  package  lof  8032 
Allows  you  la  view  lull  1 1 7  ctiaracis  line  on  screen  by  using 
"window"  approach.  Supports  all  major  primers 

Don   Jons    PortioIlD    Manigginent    Syttim  $120 

Ortine  access  to  quotes  and  data  tor  6000  stocks  from  Barrens. 
WSJ,  and  Dow  Jones  News  Service  Maintains  portfolio 
acoounling  including  tax  records. 


6502 
6502A 
6520  PIA 
6522  VIA 
6532 


7.45 
8.40 
5.15 
6.45 
7.90 


2114-L200ns  RAM 

2114-L300nsRAM 

2716  EPR0M{5  volt) 

TMS  2532  EPflOM 

4116-201)11  HtM 

S-100  Wire  Wrap 

Zero  Insertion  Force  24  pin  Socket 


10/6.95  50/6.55 

10/7.95  50/7.35 

10/4.90  50/4.45 

10/6.10  50/5,75 

10/7.40  50/7.00 

3.75  25/3.50 

3.15  25/2.90 
9.90  5/9.45 


100/6.15 

100/6.90 

100/4.15 

100/5.45 

1 00/6.60 

100/3.25 

100/2.65 

10/8,90 

20.00 

lar  24.00 

2.65 

$2.00 


CASSEHES  -  AGFA  PE-SII  PREMIUM 

Higti  output,  low  noise.  5  screw  housing,  latjels 
C-10  10/5.65      50/25.00    100/48.00 

C-30  10/7,30    50/34  00    100/6600 

All  otfier  lenglhs  available.  Write  for  price  iisi. 


Lggal  Tlmt  Accsynting  S5D0 

Allows  automatic  processing  o(  matters  by  client,  lawyer,  anfl 
actlw  ly  Provides  reports  on  dieni  dala,  aging  analyss,  acimty 
revenue,  and  productivity.  Intertaces  with  Wofdcraft  80, 

EBS  BusJosss  Sytttm  for  CBM  $600 

Provides  extremely  axnpretiensive  integrated  inventory  and 
accounts  receivable  package  including  invoices,  packing  slips, 
mail  labels,  slatements,  deposit  slips,  and  1 7  reports, 

FORTH  for  PET/CBM  or  Applt  t65 

A  full-tealured  FORTH  with  exteiEions  confofming  lo  Fortli 
Interest  Group  standards  Includes  assemUer.  string  pro- 
cessing capabilities,  disk  virtual  memory  multiple  dimensiooed 
anays,  fkiating  pont  and  integer  proccsstng 


4  PART  HARMONY  MUSIC  SYSTEM  for  PET 

The  Visibte  Music  M  onitor,  by  Frank  Levinson,  allows  you 
to  easily  enter,  display,  edit,  and  play  4  pan  harmony 
music.  Includes  whole  notes  thru 64 ths (with  itotled  and 
triplets),  tempo  change,  key  signature  transpose,  etc  The 
KL-4  M  umt  includes  D  to  A  converter  and  amptifier  (add 
yotJf  own  speakei), 
KI-4M  Bute  iiir<  ■Itt  YMM  PrufM t59.iO 


commodore  ,i 


CBM-PET  SPECIALS 

X^  Uf  tt  W5  Itn  nirehindln  ( 

K^     Witt  fUtilU  tl  Ml  ll 

<0'       Wll><l|  CBM-FET  Itini: 
8032  32K  -  80  Column  CRT 
8050  Dual  Disk  Drive  -  950,000  bytes 
4016  Full  Size  Graphics  Keyboard 
4032  Full  Size  Graphics  Keyboard 
8096  96K  -  80  Column  CRT 
2040/4040  Dual  Disk  Drive  -  34  OK 
4022  Tractor  Feed  Printer 
CBM  Voice  Synthesizer 
C2N  External  Cassette  Deck 
tJsed  CBM/PET  Computers 
VIC  Personal  Computer 

WRITE  FOR  SYSTEM  PRICES 


1295     ZBO 

795     140 

395      SO 

95      12 

CALL 

300      25 


***  EDUCATIDNAL  DISCOUNTS  "* 
Bu)  Z  PFT/CGM  Ciinpiitiri,  neiJiti  I  FREE 


WordPro  3-1- -32K  CBM,  disk,  printer  250 

WordPro  4-f-  -  8032,  disk,  printer  335 

OZZ  Data  Base  System  for  CBM  8032  335 

VIS  ICALC  for  PET  Of  ATARI  170 

BPI  General  Ledger,  A/P,  A/R  for  PET/CBM  270 


Programmers  Toolkit  -  PET  ROM  Utilities  34.90 

PET  Spacemaker  li  ROM  Switch  36.00 

2  Meter  PET  to  IEEE  or  IEEE  lo  IEEE  Cable  4000 

Dust  Cover  for  PET  690 

IEEE-Parallel  Printer  Interface  for  PET  f  f  0.00 

IEEE-RS232  Printer  Interface  for  PET  f  20.00 

TlK  PET  Revealed  f  7,00 

Librarv  of  PET  Subroutines  1 7.00 


SoufCi  Hnkip  over  1000  programs/services 


SB 


Ml  PLOT  Intelligent  Plotter 
by  Watanabe  Instruments  (Digipiot) 

SPECIAL 
$1195 


Has  all  intelligent  funclions  for  producing  paphs  and 
drawings  including  8  vector  and  4  ctiaiacte  commands. 
Solid  and  broken  lines  can  Oe  specitied.  Craiacter  gen- 
erator for  alpha,  numeric,  and  symbols.  Charac  lets  can  be 
rotated  in  4  or ientalkini  and  can  be  1 6  size;;  Cowdinate 
axes  drawn  by  specifying  graduation  interval  and  number 
ol  repetitions  Parallel  ASCII  interface,  11x17  paper 


SPECIALS 

EPSON  MX-aO  Priitir 
EPSON  MX-7D  Priilir 

STARWRITER  Daisy  Wheel  Pnnter  S1445 

Centronics  737  Pnnler  725 

NEC  Spinwfiler  2500 

Olablo  630  Daisy  Wfieel  2150 

Leedex  Video  100  12"  Monitor  fss 
ZENITH  DATA  SYSTEMS 

Z19  Video  Terminal  (factory  assem,)  729 

Z89  with  46K  (factory  assem}  2150 

SYM-1  209 

SVM  BAS-1  BASIC  or  RAE-1/2  Assembler  85 

KTM-2/80  Synerfek  VkJeo  Board  349 

Seawell  Motherfjoard  -  4  K  RAM  195 

Seaweli  16K  SUhc  RAM  ■  KIM.  SYM,  A  U  320 


DISK 
SPECIALS 


SCOTCH  (3M)  5V."  10/2,85  50/2,75  100/2,65 

SCOTCH  (3M|  6"  10/2,90  50/2,80  100/2,70 

Verbatim  5%"  10/2,45  50/2,40  100/2,35 

{add  1,00  for  5 'A"  Verbatim  plastic  slorage  box) 

Verbatime"  Obi.  Dens  10/3.45  50/3.35  100/3,25 

BASF  5'/."  10/2,60  20/2  50  100/2.40 

BASFe-  10/2.65  20/2-55  100/2.45 

WE  STOCK  MAXELL  DISKS 


Diskette  Storage  Pages 
Disk  Litirary  Cases 


8"  -  2.05 


10  for  3.95 
5' -2,15 


A 


ATARI  8CX) 

All  Atari  Moilules  20%  OFF 


ATARI  EDUCATIONAL  PLAN       Wiiti  iir  ditiiii, 

A  P  Products    15%  OFF 
APHobbyBlox    15%  OFF 

ALL  BOOK  lod  SOFTWARE  PRICES  DISCOUNTEO 

14,00 
16,90 
12,75 
13,60 
14,45 
10,45 
10,45 
9.45 
11,85 
13,60 
12.75 


The  8086  Book  (Osborne) 
ZeoOO  Assembly  Language  Programming 
PET  Personal  Computer  GukJe  (Osborne) 
PET  and  ttie  IEEe-4B8  Bus  (Osborne) 
6502  Assembly  Language  (Osborne) 
Programming  the  6502  (Zaks) 
6502  Apptications  Book  (Zaks) 
6502  Software  Cookbook  (Sceibi) 
CP/M  Handbook  (w/  MP/M)  Zaks 
Practical  BASIC  Programs  (Osborne) 
Some  Common  BASIC  Programs  (Ostwric) 
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NEW- 
LOW  COST  DISK 

FOR PET 

CBM 


PEDISK  II  from  cgrs  MICROTECH  is  a  new  floppy 
disk  controller  board  for  tfie  Commodore  PET- 
/CBM  (tm)  computer,  PEDISK  II  contains  control 
ROM  and  all  logic  required  to  read,  wrile,  and 
control  up  to  two  standard  floppy  disk  drives  (either 
5.25"  or  8").  Ttie  PEDISK  II  controller  mounts  inside 
tfie  PET  and  occupies  previously  unused  memory 
space.  The  circuit  board  plugs  into  an  existing 
ROW  socket  in  your  machine,  and  is  connected  by 
cable  to  an  external  disk  drive. 
A  complete  disk  system  includes  the  PEDISK  II 
Controller.  Disk  Operating  System  software,  con- 
ectmg  cable,  and  an  external  disk  drive  set.  Simply 
plug  m  the  controller  board,  and  your  disk  system  is 
ready  to  run. 

The  PEDISK  II  system  offers  speed,  reliability,  and 
IBM  compatibility. 

Complete  System  prices  with  DOS  and 
cable: 

5.25"  40  track,  1  drive,  143K  $560 

5.25"  80  track,  1  drive,  286K  690 

8"  I BM  3740  format,  77  track,  250K         995 

Individual  Component  Prices: 

PEDISK  II  Controller  Card  $229 

DOS  for  PEDISK  II  75 

Cable  assembly  for  2  drives  35 


CBM  SOFTWARE 

Legal  Time  Accounting  Package 
Medical  Accounting  Pacl^age 
Complete  General  Accounting  Package 
Comprehensive  Investment  Analysis  Package 
Dow  Jones  Portfolio  Management  St  35 

Personal  Tax  Calculator  65 

Tax  Preparation  System  ''''5 

iRlormation  Retrieval  and  Management  Aid  400 

Wofdcrafi  80  Wofdprocessor  Package  325 

Pascal  Developtnent  Package  295 

Assembler  Devetopment  Package  99 

Intelligent  Terminal  Emulatof  30 

SOFTPACK-1  from  Competitive  Software  25 

1 6  games  and  utilities  for  PET 

MICflOREVEHSI  for  PET  by  Michael  Riley  10 

Super  Machine  Language  Version  of  Othello 


TUNNELVISION/KAT&  MOUSE  by  Michael  Riley 
Two  excellent  machine  language  maze  pfograms 


10 


KMMWt  Pascal  for  PET/CBM        $75 

A  subset  of  standard  Pascal  with  extensions  •  Ma- 
chine Language  Pascal  Source  Editor  •  Machine 
Language  P-Code  Compiler  •  P-Code  Interpre- 
ter (for  debugging  and  learning}  •  P-Code  to  ma- 
chine language  translator  for  optimized  object 
code  •  Run-time  package  •  Floating  point  cap- 
ability •  Llser  manual  and  sample  programs  •  In- 
cludes source  code  editor 
Specify  ROM  version  (16K  minimum),  disk  or  tape. 


EARLfor  PET  (diskfile  based)       $65 

Editor.  Assembler,  Relocater.  Linker.  Generates 
relocatable  object  code  using  MOS  Technology 
mnemonics. 

Disk  file  input  (can  edit  fiies  larger  than  nnemory). 
Links  multiple  object  programs  as  one  memory 
load.  Listing  output  to  screen  or  printer.  Enhanced 
editor  operates  in  both  command  mode  and  cursor 
oriented  "window"  mode. 


SUPERSORT  by  James  Strasma  $35 

Supersort  is  an  excellent  general  purpose  machine 
language  sort  routine  for  PET/CBM  computers. 
Sorts  both  one  and  two  dimensioned  arrays  at 
lightning  speed  in  either  ascending  or  descending 
order.  Otherfields  can  be  subsorted  when  a  match 
is  found,  and  fields  need  not  be  in  any  special  order. 
Sort  arrays  may  be  specified  by  name,  and  fields 
are  random  length.  Allows  sorting  by  bit  to  provide 
a  categories  per  byte.  The  routine  works  with  all 
PET  BASICS,  adjusts  to  any  memory  size,  and  can 
co-exist  with  other  programs  in  high  memory. 


PERSONAL  SOI^ARE 

Microcness 
Cnecl<er  King 
Gammon  Gambler 
Time  Trek 
Bridge  Partner 


1700 
1700 
1700 
13.'15 
13,45 


HAYDEH  SOIIWARE 

Complex  Mathematics 
Engineering  Mathematics 
General  Mathematics 
MCAP  Circuit  Analysis  Program 
Energy  Miser 


1270 
12  70 
1270 
2100 
24  50 


JUKEBOX  SERIES  FOR  PET  by  LC  Cargile 
Excellent  4  part  harmony  music— mite  fo*  list 

Automated  Simulations  lEPVX)  Fantasy  Games 


PAPER-MATE 
50  COMMAND 

WORD 
PROCESSOR 


Paper-Mate  is  a  lull-fealuied  word  processor 
lot  529,00  by  Michael  Riley  Paper-Mate  incoi- 
porates  60  commands  to  give  you  full  screen 
editing  with  graphics  for  all  1 6k  or  32K  PETs,  all 
printers,  and  disk  or  tape  drives  II  also  includes 
most  leatures  of  the  CBM  WordPro  III,  plus  many 
additional  leatures 

For  writing  text,  Paper-Mate  has  a  delinable 
keyboard  so  you  can  use  eilhet  Business  or 
Graphics  machines  Shilt  lock  on  letters  only,  or 
use  keyboard  shift  lock  All  keys  repeat 

Paper-Mate  text  ediling  includes  lloatmg  cur- 
sor, scroll  up  or  down,  page  (onward  or  back,  and 
repealing  insert  and  delete  keys  Text  Block 
handling  includes  transler.  delete,  append,  save 
load  and  mseri 

Al  Hormall  ing  commands  are  imbedded  in  tex  t 
(or  complete  [;Dnirol  Commands  include  margin 
control  and  release  column  adjust.  9  tab  settings, 
variable  line  spacing  lustify  text,  center  text  and 
auto  print  lorm  letter  (variable  block)  Files  can  be 
linked  so  thai  one  command  pfints  an  entiie 
manuscript  Auto  page,  page  headers,  page 
numbers  pause  at  end  of  page,  amJ  tjyphenation 
pauses  are  included 

Unlike  mosi  word  processors,  PET  graphics  as 
well  as  text  can  be  used  Paper-Male  can  send 
any  ASC1 1  code  over  any  secondary  address  to 
any  printer 

Paper-Male  works  on  16K  oi  32K  PETs  with 
any  ROM,  cassette  or  disk  and  CBM  or  non- 
CBM  printers  An  8K  version  is  m  the  planning 

To  order  Paper- Mate,  specify  machine  and 
ROM  type 

On  Tape  (with  manual): S4D.D0 

On  Disk  (with  manual):  J4Z,00 

Manual  Separate:   $  1,00 


Self  Calculating 
DATA  BASE 

REPORT  WRITER 

foi  (;BM,'PET  Comoi.le'S^  MAILING    LIST 

Flex  File  is  a  set  of  flexible,  friendly  programs  to  allow  you  to 
set  up  and  maintain  a  data  base  as  well  as  print  files  witti  a 
versatile  Report  Writer  or  a  Mail  Label  routine.  Programmers 
will  find  It  easy  to  add  subroutines  to  their  own  programs  to 
make  use  ol  Data  Base  files 

RANDOM  ACCESS  DATA  BASE 

Record  Size  limil  is  250  characters  The  number  of  records 
per  disk  IS  limited  only  by  ttie  si^e  ol  each  record  and  the 
amount  of  free  space  on  the  disk.  File  maintenance  lets  you 
step  fonward  or  tackward  through  a  file,  add,  delete  or 
change  a  record,  go  to  a  numbered  record,  or  find  a  record 
from  a  specified  field.  The  Find  command  locates  any  record 
when  you  enter  all  (or  a  portion  of)  the  desired  key  field 
Field  lengths  can  vary  from  record  to  record  provided  the 
sum  of  the  liBlds  does  not  exceed  the  size  of  the  record  This 
allows  maximum  packing  of  information  The  die  can  be 
sorted  by  any  field.  Any  field  can  be  specified  as  a  key  field 
at  any  time.  Sequential  files  from  other  programs  can  be 
ccflverted  to  random  files,  and  random  can  be  converted  to 
sequential  Maximum  record  size,  fields  per  record,  and 
order  ol  lields  can  be  changed  at  any  lime 


MAILING  LABELS 

When  record  size  is  1 27  characters  (typical  (Of  mailing  list), 
each  disk  can  handle  over  1 000  records  (alMut  2800  with 
the  8050  drive).  Labels  can  be  printed  any  number  of  labels 
across,  and  in  any  column  position.  Any  number  o(  fields  can 
be  printed  on  a  latKl  in  any  order,  and  two  or  three  fields  can 
be  joined  together  on  one  line  (like  first  name,  last  name,  and 
title)  A  "type  ol  cusiomer"  lield  allows  selective  printing, 

HEPOHT  WRITER 

The  contents  of  any  field  can  be  placed  in  any  column 
Numerics  can  be  decimal  point  justified  and  rounded  to  any 
accuracy  Any  column  can  be  defined  as  a  series  of  math- 
ematical (unctions  performed  on  other  columns.  These 
functions  may  include  +.  -,  x,/ .  %.  and  various  log  and 
irig  (unctions,  Resi-ltj  of  operations  such  as  running  total 
may  be  passed  (rom  row  to  low,  Al  the  end  of  the  report  a 
total  and/or  average  can  be  catulated  (or  any  column. 
Complete  record  selection,  including  field  within  range, 
pattern  match,  and  logical  functions  can  be  specilied 
individually  or  in  combination  with  other  parameters 

Rei  File  was  developed  by  MIcliael  Riley. 

Flet  File  System  SGO 

Specify  machine  size  (32K  recommended)  and  ROM  type 
tor  bolh  disk  and  computer 


Good  things  coming! 

CBM  Micro  Mainframe 

CMB  8096 

CBM  Single  Disk  Drive 

EASTERN  HOUSE  SOFTWARE 

ROM  Rabbit 

Cassette  Rabbil 

Macro  Assembler  and  Text  Editor 

MAE  Macro  Assembler  and  Editor 

TRAP  65 


SAVE  ENERGY 

with 

Commodore  Programmable 

Thermostat 

Installs  easily  in  place  of  your  existing 
unit  to  save  up  to  30%  on  your  fieating/ 
cooling  bills. 

Introductory  SPECIAL  S1 1 4 
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Add  S 1 .25  per  order  for  shipping.  We  pay  balance 
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The  Practical 
Aspects  Of 
Assembly 
Language 
Programming 


Bruce  D.  Corbrey 
Raleigh,  NC 

Part  I:  Using  Flags 

II  starts  with  a  vague  sense  of  dissatisfaction  with 
the  limitations  of  BASIC.  Then  you  feel  a  twinge 
of  jealousy  towards  that  mysterious  cult  of  software 
Gurus  who  seem  to  use  black  magic  to  exhort  tlieir 
machines  to  run  devilishly  Fast  and  speak  in  strange 
tongues  to  devices  like  PIAs  and  UARTS.  Before 
you  know  it  you're  TAKING  THE  PLUNGE 
(COMPUTE!,  March,  1981),  and  after  struggling 
down  a  river  of  addressing  modes  and  across  a  sea 
of  opcodes,  you  know  you've  passed  the  initiation 
rites  and  can  call  yourself  an  Assembly  Language 
Programmer.  But  perhaps  you  still  feel  like  some- 
thing of  a  novice  programmer  when  it  comes  to 
assembly  language.  If  you  know  assembly  language, 
but  don't  feel  confident  that  your  machine  language 
routines  are  the  best  that  they  can  be,  this  series  of 
articles  may  help.  Even  if  you  are  an  "expert" 
assembly  language  programmer,  you  may  find  a 
useful  technique  or  two  presented.  Or,  you  may 
know  of  better  techniques,  in  which  case  I  encour- 
age you  to  write  them  up  and  send  them  in  to 
COMPUTE!,  so  we  can  all  benefit. 

I'm  going  to  cover  a  number  of  loosely-related 
topics  in  detail,  putting  emphasis  on  program 
efficiency.  After  all,  it  is  almost  axiomatic  that  if 
you  are  programming  in  assembly  language  at  all, 
you  are  doing  it  either  to  improve  execution  speed 
or  to  reduce  program  size,  or  both.  The  rest  of  this 
article  assumes  that  you  have  a  basic  working 
knowledge  of  6502  asseinbly  language.  The  first 
installment  discusses  the  deceptively  simple  topic 
of  flags. 

Representing  Fiags 

Flags  are  lamiliar  to  any  experienced  programmer. 
A  fiag  is  a  variable  which  can  have  only  two  possible 
states:  TRUE  or  FALSE.  It  can  be  represented  by  a 
single  bit  in  memory,  but  for  ease  of  manipulation 
by  a  program,  a  whole  byte  is  usually  used. 


Since  flags  are  so  simple  in  concept,  you  may 
be  surprised  to  know  that  many  programmers  use 
flags  quite  inefficiently.  To  demonstrate  what  I 
mean,  first  consider  the  example  program  in 
Listing  1 .  This  subroutine,  usually  called  a  keyboard 
driver,  reads  one  character  from  an  ASCI  I-encoded 
keyboard.  The  keyboard  is  assumed  to  be  ( onnected 
to  a  parallel  I/O  port  such  as  is  found  in  a  6820, 
6522,  6530,  6532,  or  similar  device.  The  seven  data 
lines  from  the  ke\  board  are  tied  to  bits  0  ihrotigh 
6,  and  a  negative-going  strobe  is  connectL'd  lo  bit  7 
of  the  port.  When  bit  7  of  the  port  becomes  zero, 
the  ASCII  code  for  the  key  which  is  depiessed  can 
be  read  on  the  remaining  7  bits.  Notice  that  the 
strobe  is  connected  to  bit  7  because  bit  7  is  always 
zero  in  the  ASC'II  code  anyway,  and  because  we 
can  test  it  easily  using  BMl  or  BPL  instruc  tions, 
since  bit  7  is  the  sign  bit  in  a  word. 

Now  suppo.se  that  you  discover  that  your 
Monitor  program  will  accept  only  uppercase 
alphabetic  letters  for  commands,  but  your  keyboard 
only  delivers  lower  case  letters  unless  you  hold 
down  SHIFT.  What  can  you  do  about  this  nuisance 
if  you  don't  have  an  ALPHA  LOCK  key?  Vou 


Properly  used,  flags 

can  greatly  simplify  and 

improve  your  programming. 


could  go  to  the  parts  box  and  build  a  circuit  to 
modify  your  keyboard,  or  you  can  take  the  software 
approach  and  simply  add  some  code  to  y;)ur  driver 
to  "fold"  all  lower-case  alphabetic  characters  ($61 
through  $7A  in  the  .'\SCII  table)  to  their  uppercase 
equivalents,  as  siiown  below: 


FOLD       CMP 

#$7B 

;LOWERCASE"Z"+l 

BCS 

FOLDl 

;BRANCH  IFNOT LOWER  CASE  ALPHA 

CMP 

#$61 

iLOWERCASEA 

BCC 

FOLDl 

;BRANCH  IFNOT  LOWERCASE  ALPHA 

SBC 

#S20 

;ELSE  FOLD  LOWER  TO  UPPER  CASE 

FOLDl     ... 

ALPHA 

This  code  can  simply  be  inserted  at  the  cud  of  the 
keyboard  dri\er,  just  before  the  RTS.  The  trouble 
is,  your  dri\er  will  now  always  return  upper  case  al- 
phabetic characters.  This  may  be  desirable  for  en- 
tering commands  to  the  Monitor,  but  when  you're  in 
the  Editor  you  may  want  to  be  able  to  input  lower 
case.  The  solution?  You  need  an  "Alpha-lock  Ena- 
ble" flag  to  tell  the  driver  whether  to  allow  l<nver  case 
or  not.  You  can  start  by  allocating  space  for  your 
flag: 


ALFALK     .BYTE     0 


;ALPHA  LOCK  FLAG  FOR 
KEYBOARD  DRIVER 


Now  how  do  vou  use  it?  The  natural  choice  is  to  set 


Shortcuts  to  more 
Commodore  capability 

4  amazing  new  devices  to  mafce  your  Commodore 
friendlier,  faster  and  more  productive  than  ever 


If  you  have  a  Commodore  computer,  life 
at  tfie  keyboard  just  got  easier,  ttianks 
to  four  new  products  from  Kansas  City  Com- 
puters. Inc 


THE  SILENT  SWITCH 

If  you  use  a  switching  device  on  your  ROM 
based  software,  you  may  have  experienced 
—select  line  transient  problems. 

Introducing  our  Triple  Flip  firmware.  Its  a 
remarkably  simple  switch  that  can  be  elec- 
tronically mec/ian/ca//y  switched-  With  the 
external  switch  running  to  internal  switcliing, 
there  are  no  address  lines  outside  the  com- 
puter. That  nips  select  line  transient  problems 

right  at  the  source. 

Triple  Flip  lets  you  place  three  individual 
ROMS  in  a  singleROM  socket.  Asingleswitch 
can  control  up  toseven  Triple  Flips. That  gives 
you  21  ROlvl  capability. 

Versatile^  Triple  Flip  is  one-socket  ROM 
selectable  for  Commodore  computers  2716, 
2532  and  2732.  It  also  fits  Pet  2001B.  N  and 
later  models. 

And  like  all  KCCI  products,  it's  backed  by 
our  full  guarantee  and  90-day  warranty. 

Don't  change  chips  everytimeyou  switch  to 
another  program.  And  dont  risk  select  line 
transient  problems.  Put  Triple  Flip  to  work  for 
you  for  just  S39.95. 

30  NEW  COMMANDS 

Until  now,  you've  had  to  punch  the  keys  24 
times  or  more  to  put  some  commands  into 
action.  Commands  liketransferring  programs 
to  disk  or  paper,  or  appending  program 
modules. 

Order  our  UtiilRom  and  start  using  your 
computer's  memory  instead  of  your  own. 
UliliRom  includes  an  enhanced  DOS  univer- 
sal wedge  that  lets  you  make  most  of  your 
present  commands  in  two  keystrokes.  Imag- 
ine having  all  this  at  your  command: 

•  Wild  card  directory  (DOS) 

•  Rename  a  file  (DOS) 

•  Wild  card  file  scratch  (DOS) 

•  Copy  files  on  disk  (DOS) 

•  Reset  disk  system  (DOS) 

•  Initialize  2000  series  drives  (DOS) 

•  Check  error  channel  (DOS) 

•  New  a  disk  (DOS) 

•  Validate  a  disk  (DOS) 

•  Scroll  down 

•  System  cold  start 

•  One  key  command  to  load  a  program 
(DOS) 

•  Send  program  listing  to  printer  (with'  or 
without"  form  feed  at  end) 

•  Send  screen  contents  to  printer  (normal 
mode'  or  squeezed') 

•  Send  screen  contents  to  disk  file  by  any 
name' 

•  Disk  program  append' 

•  Repeat  key  function* 


•  Kill  to  turn  off  repeat' 

•  Escape  to  turn  off  ROM' 

•  Convert  hex  to  decimal  or 

•  Convert  decimal  to  hex  (with  error 
detection} 

•  Fast  jump  to  monitor 

•  Fast  shift  to  upper  or  lower  case 

•  Fast  jump  to  cold  start 

•  One  key  command  to  save  a  program 

•  Beep  (programmable)' 

'Asterisk  indicates  routines  which  can  be 
called  in  basic  as  subroutines  lor  increased 
computer  power. 

Warning!  Extensive  testing  has  proven  that 
even  casual  users  of  LItiliRom  become 
hooked  on  its  efficiency  and  speed.  Serious 
programmers  and  custom  software  designers 
appreciate  the  fact  that  routines  are  included 
for  fast  disk  l.^'O  —  up  to  3  times  fasterthan  the 
system  routines.  In  addition.  UtiilRom  can 
help  protect  software  designs  from  theft. 

UliliRom  firmware  is  available  for  any 
socket  on  any  Commodore  system  (including 
the  Address  9000).  When  used  with  Chipmate 
firmware  (below),  you  can  use  UtiliRom  in  the 
same  socket  simultaneously  with  one  other 
2K  ROM  such  as  Toolkit'" 

Order  UliliRom  now  at  just  549.95, 

Order  Chipmate  firmware  with  UtiliRom  for 
same  socket  simultaneous  use  with  most 
other  2K  ROMs.  Chipmate  with  UtiliRom  is 
only  S61.90.  Chipmate  alone  is  S14.95. 

COMPUTERIZED  SCRATCH  PAD 

Dream  up  anything  you  want  and  put  it  on 
yourscreen.  Punch  acouple  of  keysand  put  it 
on  disk  in  less  than  two  seconds.  Retrieve  it 
anytime,  almost  as  fast  as  you  can  visualize  it. 
Hit  two  more  keys  and  it's  generated  on  your 
printer  in  page-perlect  format. 

You're  not  dreaming.  You're  using  Screen 
Pro  software,  the  new  disk  based  system  that 
adds  exciting  new  powers  to  your  computer 
—  and  a  faster  response  than  ever  before. 

From  compiling  grocery  lists  toediting  cat- 


Kansas  City  Compulers.  Inc. 

5214  Blue  Ridge  Boulevard 

Kansas  City,  Missouri  64133  •  Phone  816/356-6502 


alogs,  from  diagramming  football  plays  to 
animating  them.  Screen  Pro  makes  text  and 
diagram  work  incredibly  simple. 

Screen  Pro's  entire  2000  character  screen  is 
displayed  in  a  fraction  of  a  second.  You  can 
easily  place  this  subroutine  into  any  software 
you  write,  for  quick  access  later.  In  fact,  an 
eight  line  program  gives  you  access  to  any 
oneof  10, 000  pages  of  information  — all  within 
four  screens! 

Clear,  understandable  documentation 
shows  you  how  to  tailor  Screen  Pro  to  your 
exact  needs.  And  it  opens  your  eyes  to  uses 
limited  only  by  your  imagination  —  for  only 
S39.95. 

MONEY  BACK  GUARANTEE 

All  four  products  come  to  you  with  com- 
plete, easy-to-follow  documentation.  Instal- 
lation instructions  that  are  a  snap.  Plus  step- 
by-step  examples  that  walk  you  through  the 
process. 

You  get  more  than  documentation  with 
your  KCCI  order.  You  get  dependability. 
Dependability  backed  by  our  Money  Back 
Guarantee.  Plus  our  full  90-day  Service 
Warranty  (that's  three  times  as  long  as  most  of 
our  competitors'  warranties). 

Start  investing  less  time  in  yourcomputer— 
and  start  getting  moreout  of  it.  Fill  out  and  mail 
this  coupon  with  your  check  today. 

Or  see  your  local  Commodore  dealer. 


Toalkii"  IS  a  tradema'k  of  Palo  Airo  ICS  Inc 
"Commodore  Business  Machines 


Name 

Address. 
City 


.  Slate^ 


Computer  make 

Disk  system  make. 


_Zip_ 
.Model. 
.Model. 


YES'  Please  send  me  ttiese  shortcuts  tor  more  computer  capability.  My  check  is  enclosed 
□  TRIPLE  FLIP  S39.35        D  CHIPMATE  WITHOUT  UTILIROM       $14.95 

D  UTILIROM  S49.95        D  SCREEN  PRO  S39.95 

n  CHIPMATE  WITH  UTILIROM  S61.90       D  TOTAL  ORDER 


(Add  SI. 50  shipping  &  insurance  for  U.S.  orders.  Add  S3. 10  shipping  for  foreign  orders  - 
must  be  in  U.S.  funds  In  Missotiri,  add  4%  sales  tax  ) 


-paymeni 
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EAST  COAST 

OMEGA  Sales  Co. 

12  Meeting  St. 

Cumberland,  Rl  02864 

1-800-556-7586 

1-401-722-1027 


fnMEGA' 

SALES 

CO. 


WEST  COAST 

HMEGA  Safes  Co. 
3533  Old  Conejo  Rd.  #102 
Newbury  Park,  CA  91320 

1-800-235-3581 

1-805-499-3678 
CA.  TOLL  FREE   1-800-322-1373 


SPBCIAL  OF  TUB  MOHTH 


ATARI  800  32K  +  OKIDATA  MICROLIIME-8CJ 
INCLUDING  ATARI  INTEPFACE  +  CABLE 


IS 


AN    ATARI  8ia 


CREADY  TO  GO) 

=  $13S9 

CEPSON  MX-a» 

DRIVE 


THEN  ADD   A 
LEEDEX/AMDEK    13" 


=   S175SI 


IR  lyiONITDR 


FOR  SSOSS  !!! 


S    EAST  COAST  /  WEST  COAST     M 

fMEGA  SALES  COMPANV 
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EAST  COAST 

nMEGA  Sales  Co. 

12  Meeting  St. 

Cumberland,  Rl  02864 

1-800-556-7586 


1-401-722-1027 


WEST  COAST 

nMEGA  Sales  Co. 
3533  Old  Conejo  Rd.  #102 
Newbury  Park,  CA  91320 

1-800-235-3581 

1-805-499-3678 
CA.  TOLL  FREE  1-800-325-1873 


CBM 
8032 

$1475 


Tractor  opti 
$245 


NEC  12' 
MONITOR 


EPSON 
MX-80 


EPSON  MX-70 
PRINTER 
$349 

a 

AM  prices   subject 
to  change  w/o  notice 


INTERTEC  SUPERBRAIN  64K  RAM 

QD  SUPERBRAIN 

NEC  5510SP1NWRITER 

NEC  5530  SPINWRITER 

OKIDATA  MlCROLlNE-80 

OKIDATA  MICROLINE-82 

OKIDATA  MICROLINE-83 

APPLE  II  PLUS  48K 

APPLE  DISK  w/3.3  DOS  Controller 

APPLE  DISK  w/o  Controller 

BASE  II  PRINTER 

HAZELTINE  1420 

NORTHSTAR  HORIZON  II  32K  QD 

ANADEX  DP-9500 

TELEVIDEO  912C 

TELEViDEO  920C 

TELEVIDEO  950 

CBM  8032  COMPUTER 

CBM  8050  DISK  DRIVE 

CBM  4032  COMPUTER 

CBM  4040  DISK  DRIVE 

CBM  4022 

CBM  VIC-20 

CBM  C2N 

RADIO  SHACK  II  64K 

RADIO  SHACK  III  16K 

LEEDEX/AMDEK10D 

LEEDEX/AMDEK100G 

LEEDEX/AMDEK  COLOR-1  13"  Color  Monitor 

MICROTEK  16K  RAMBOARD  for  ATARI 

MICROTEK  32K 

ATARI  400  16K 

ATARI  825  PRINTER 

ATARI  850  INTERFACE 

or  both  together 
ATARI  810  DISK  DRIVE 

fCall  for  price  list  of  ATARI  software) 


$2799 
$3195 
$2595 
$2595 
$  399 
$  529 
$  799 
$1189 
$  545 
$  435 
$  599 
$  799 
$2975 
$1295 
$  669 
$  729 
$  959 
$1475 
$1449 
$1090 
$1090 
$  679 
$  289 
$  85 
$3245 
$  339 
$  139 
$  169 
$  349 
$  99.95 
$  165 
$  349 
$  619 
$  139 
$  749 
$  449 


•  NO  SURCHARGE  FOR  CREDIT  CARDS 

•  WE  ACCEPT  C.O.D.'S 

•  ALL  EQUIPMENT  FACTORY  FRESH  W.  MANUFACTURER'S  WARRANTY 

•  STOCK  SHIPMENTS  USUALLY  SAME  DAY  OR  NEXT  DAY 

•  NO  HIDDEN  CHARGES  -  WE  LIVE  L'Y  OUR  PUBLISHED  PRICES 


a 
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the  flag  to  1  if  it's  true  and  0  if  it's  false.  The  com- 
plete driver  routine  using  this  method  is  shown  in 
Listing  2. 

This  routine  is  satisfactory  (because  it  works!), 
but  it  can  be  substantially  improved.  Notice  that  you 
had  to  temporarily  save  the  returned  character  on 
tlie  stack  while  you  tested  the  Alpha-lock  flag. 

NcM  time  I'll  show  a  siibstaiiiial  iniprovemeni 
and  more  ways  to  inipiove  efficiency. 


See  the  introdiictory  issue  of 

Home  and  Educational  Computing! 

in  this  issue  of  COIVIPUTE! 


Now 

You  Can 

Subscribe  to 

COMPUTE! 

By  Calling 

TOLL-FREE 
800-227-1617,  Ext.  401 

In  California  Call  800-772-3545,  Ed.  401 

MasterCardA/ISA  accepted 

Operators  Standing  By 

24  Hours  7  Days  A  Week 

This  is  an  order  line  only. 

Subscribers  with  questions 
about  their  subscription 
should  call  919-274-9809 


NEED  MORE  MEMORY? 

32K  BYTE  DYNAMIC  RAMi-ROM  EXPANSION  BOARD 
Expand  Your  4K/8K  PET/SYM/KIM/AIM-65  to  32K 

•  EuUy  connected  Lo  your  cpmpuWr  via  the  eipajuion  connector. 

•  BuiJd  huge  and  complex  prognuna! 

•  Need  &4K  of  RAM?  Buy  two  boartij.  on  board  confi^racion  circuitry  wiij  aUow 
you  to  expand  to  54K  eajjy! 

•  New  dynamic  RAM  technology  brings  you  more  memory  in  leas  apace  and  at  a 
lower  cost! 

•  Ram  chips  are  upgrade  compatible  with  the  new  64K  RAM  chips  Tor  ftjture 
erpanatonl 

"  Operates  on  -4-S  volts  only,  supplied  from  your  computer  power  supply,  no  on 

board  generators  to  go  bad. 

■  Requires  A  LOT  leaa  power  than  sutic  RAM! 

•  Haa  full  invisible  refresh  operation,  doea  not  interfere  with  prtKeaaor  operation, 

•  Fully  buffered  DATA  BUSS. 

"  5  00  board  sociieta  (or  2716/2732  I2K/.4K)  type  EPROMS,  addressable 
anywhere. 

•  Great  for  desigmng  a  two  boortl  computer  system, 

•  Other  specifications: 

Disable  inylK  block  of  RAM  for  l.'O,  plica  RAM  above  or  below  80O0  HEX. 
KIM-1  BUSS  COMPATIBLE  FOR  CARD  RACKS,  Adapter  cablea  avulible  for 
non  rack  use, 

•  iMl  these  features  on  a  6  x  4.5"  board! 

ASSEMBLED  &  TESTED  BOABDS  -  GUAIlAi>fTEED  FOB  6  MONTHS 

PLTICHASE  PRICE  IS  FULLY  REFUNDABLE  IF  RETUTtVED 

UNDAMAGED  WlTHm  U  DAYS 


List  Price— $289.88  ^_ 

Introduclory  Price -$269.88  MiHI| 


m 


Include   S2,00for  S8H  —  Allow  4  weeks  for  delivery 

Full   iniormotive  documenfation  included  with  oil  our  products 
C.O.O.  Orders  Accepted  (702>  361-6331     Mail  Order  Only, 


PROTRONICS 

COMPUTER     INNOVATIONS 


15UE.Traplcana.S<jit*7Aai$ 
Lu  V«goi,  Navcido  89109 


?^t 


The  Most  Powerful  Diiik-Based 
Macro  Assemblef/Texr  Editor 
Available  at  ANY  Pricu 


Now  includes  the  simplified  Text  Processor  (STP) 

For  32K  PET,  disk  48K  APPLE    II 

3.0  or  4.0  ROMS  or     —  OR  —       or  APPLE  II  + 
8032    (jpecHy(  and  DISK  II 

MAE  FEATURES 

—  Control  Files  for  Assemtjiing  Multiple  named  source  files 
from  disk 

~    Sorted  Symbol  tat>le  —  up  to  31  chars./label 

—  27  Commands.  26  Pseudo-ops,  39  Error  Codes 

—  Macros,  Conditional  Assembly,  and  a  new  feature  vie  developed 
called  Interactive  Assembly 

—  Relocatable  Object  Code 

—  String  search  and  replace,  move,  copy,  automatic  line 
numbering,  etc, 

STP  FEATURES 

—  1  7  text  processing  macros 

—  Right  and  left  Justification 

—  Variable  page  lengths  and  widths 

—  Document  size  limited  only  by  disk  capacity 

—  Software  lower  case  provision  for  APPLE  II  without  lower 
case  modification 

ALSO   INCLUDED 

—  Relocating  Loader 

—  Sweet  16  macro  library  for  APPLE  and  PET 

—  Machine  Language  macro  library 

—  Sample  files  for  Assembly  and  text  processing 

—  Separate  manuals  for  both  APPLE  and  PET 
PRICE 

—  MAE,  STP,  Relocating  Loader,  Library  files.  50  paiie  manual 
diskette  —  ST69.9S  .         k   .p        •.lua., 


MasterCard 


SEND  FOR   FREE  DETAILED  SPEC  SHEET 

EASTERN  HOUSE  SOFTWARE 

3239  LINDA  DRIVE 
WINSTON-SALEM,  N.  C,  27106 


(9  19)    924-2889 


(9)9)    748-8448 
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LISTING  1:  SIMPLE  KEYBOARD  DRIVER  ROUTINE 


1700  H'AD 

1701  PADD 

* 

0000 

1780  A900 
1782  8D0117 
1785  AD0017 
1788  30FB 
178A  2C0017 
178D  lOFB 
178F  60 

0000 

NO  ERROR  LINES 


INCH 


INCHl 
INCH2 


SUBROUTINE  INCH:  KEYBOARD  DRIVER  FOR  ASCII-ENCODED 
KEYBOARD  WITH  PARALLEL  INTERFACE. 

ADDRESSES  SHOWN  ARE  FOR  6530  ON  KIM-1  COMPUTER. 
KEYBOARD  DATA  LINES  TO  PORT  A  BITS  0  TO  6, 
NEGATIVE  GOING  STROBE  TO  BIT  7. 

ON  ENTRY:  NO  ARGUMENTS. 

ON  RETURN:  REGISTER  A  =  ASCII  CODE  FOR  KEY  PRESSED; 

X  AND  Y  PRESERVED. 

$1/00     ;KIM  PORT  A  DATA  REGISTER  ON  6530 
51/01     ;KIM  PORT  A  DATA  DIRECTION  REGISTER 


$1780     ;**PROGRAM  ORIGIN 


** 


LDA 
STA 
LDA 
BMI 
BIT 
BPL 
RTS 

.END 


#$00 

PADD 

PAD 

INCHl 

PAD 

INCH2 


;SET  PORT  DIRECTION  =  INPUTS 

;TEST  PORT 

;WAIT  FOR  STROBE  PULSE 

;WAIT  FOR  END-OF-STROBE 


LISTING  2:  KEYBOARD  DRIVER  WITH  ALPHA  LOCK  FLAG 
USING  0  =  FLASE  and  NON-O  =  TRUE 


SUBROUTINE  INCH:  KEYBOARD  DRIVER  FOR  ASCII-ENCODED 
KEYBOARD  WITH  PARALLEL  INTERFACE. 

ADDRESSES  SHOWN  ARE  FOR  6530  ON  KIM-1  COMPUTER. 
KEYBOARD  DATA  LINES  TO  PORT  A  BITS  0  TO  6, 
NEGATIVE -GOING  STROBE  TO  BIT  7. 

ON  ENTRY:  IF  ALFALK  IS  NON-O,  THEN  ALL  LOWERCASE  LETTERS  WILL 

BE  RETURNED  AS  THE  EQUIVALENT  UPPERCASE  ALPHA. 

ON  RETURN:  REGISTER  A  =  ASCII  CODE  FOR  KEY  PRESSED; 

X  AND  Y  PRESERVED. 


1700 
1701 


PAD 
PADD 


$1700 
$1701 


;KIM  PORT  A  DATA  REGISTER  ON  6530 
;KIM  PORT  A  DATA  DIRECTION  REGISTER 


0000 

1780  A900 
1782  8D0U7 
1785  AD0017 
1788  30FB 
178A  2 COO 17 
178D  lOFB 


INCH 


INCHl 
INCH2 


LDA 
STA 
LDA 

BMI 
BIT 
BPL 


$1780 

#$00 

PADD 

PAD 

INCHl 

PAD 

INCH2 


; PROGRAM  ORIGIN 


;SET  PORT  DIRECTION  =  INPUTS 

;TEST  PORT 

;WAIT  FOR  STROBE  PULSE 

;WAIT  FOR  END  OF  STROBE 
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aO/40  COLUMN   SPACE  INVADERS 

*29.95 
Ex«tly  duplicites  the  fiioui  ircidg    giH.      Enjoy    houri    ai 
chiUenging  fiw.    For  CoMotfort  Cotputers    nith    Release    1    of 
BASIC,  either  4C  or  80  Coluin  Screens 


COMMODORE       ^  X  C       SOFTWARE 
Buility  Saftmre  iiJtich    incorporates    eicitinq    Sound,     Color, 
graphics  and  ftnniiation.      ShoN  off  all  of  the  lany  facets    and 
cipabtlities  tif  your  coiputer. 


Lunar  Lander 
Mrap 

Sreakout 

Blackjack 

Pong 

Slots 

Alieti  Raiders 

Boatii  AHay 


Hoie  Fitianct 
Hath  Drill 
Hangtan 
Yahtzc 
Othello 
Target  Nocn 
Shooting  Gallery 
Capture 


All  of  the  above  are  priced  at  19, ?5  or  selett    any    three 

127.50.    Please  arid  «3.M  and  specify  tS*  BOS    release    if 

Mish  disk  based  softiare. 

Send  SASE  to  be  inctaded  on  our  tailing  lilt. 

Add  ,50  shipping  and  handling.      Thank  You. 


for 

you 


MICRO      si=ec 

2905  Ports  O'Call  Ct.       Piano,  Ti 


75075 


I2M>  867-1333 


I 
I 


EDUCATIONAL  PnOGR/KMS 

FOR  COMMODORE  PET,  &  \/lC 

M^.L-A,® 

(Microcomputer  Assisted  Learning  Aids) 

Software  programs  on  cassette — elementary  levels 

32  programs — 4  per  month  all  PETS— $48.00 

Pet  educational  software  catalog 

300  programs — $2.50 

COMM'DATA  SYSTEMS 

P.O.  BOX  325  

MILFORD  Mf.  48042 
(313)  685-01  f  3 


Michigan  resiuenii  ,iod  un 


40  BUSINESS  PROGRAMS 

Includes  171  page  manual  with  complete 
documentation  and  examples. 

COMPLETE  $49  or  Manual  Only  $18 
KDBM-Data  Base  Manager  $21 

Call  or  write  for  more  details  and  complete  list. 


ABS  Software 
P.O.  Box  177 
AdkinsJX  78101 


CBM/Apple 
Disk  or  Tape 
512-649-15Si0 


Wondering  where  to  find  programs  for  your  new       \^B  ^2 


CREATIVE 
SOFTWARE 


is  your  source  for  VIC  programs. 


Our  introductory  Offer  .  .  . 

THREE  CHALLENGING  GAMES 
on  cassette 

•  Seawolf 

•  Bounce  Out 

•  VIC  Trap 

READY  TO  LOAD,. .FUN  TO  PLAY 


$24.95 

Add  S 1  50  for  shipping /handling 
Calif-  residents  add  Sales  Tax 
MasterCard  and  VISA  orders  accepted 


CREATIVE 
SOFTWARE 


Write  or  phone  for  information  on  our 
other  games,  household  utility  and 
educational  programs  for  your  VIC. 


201  San  Antonio  Circle,  ^270 
Mountain  View.  CA  94040 
(415)948-9595 


Special  Introductory  Issue  Price  50C 
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The  Editor's  Notes 

Robert  Lock 


WdCOtnC  to  the  introductory  issue  of  Home  and  Educational  Computing!  In  these  pages 
you'll  find  a  hint  of  what's  to  come  in  the  months  ahead.  Our  concept  of  a  magazine  is  quite  simple:  we 
should  be  a  source  of  useful,  reliable  information  to  users  at  all  levels,  from  absolute  beginner  to  most 
advanced.  In  each  issue  you'll  find  information  valuable  in  learning  to  apply  your  computer  in  an  ever  greater 
variety  of  ways, 

You're  important  to  this  magazine  as  a  reader  and  contributor.  We  welcome  your  comments, 
suggestions,  programs  and  articles.  And  please  let  us  know  whatyou  think  of  the  magazine. 

On  With  The  Notes 

If  you're  already  a  VIC-20  owner,  you  may  be  experiencing  some  color  problems.  The  units  shipped,  at  least  in 
the  US,  have  experienced  some  variable  amount  of  RF  interference.  Two  things  to  try: 

1.  Reorient  your  VIC  or  modulator  (as  you  would  a  portable  TV/  antenna)  to  see  if  relative  position 
improves  your  color. 

2.  inside  your  VIC  is  a  blue,  variable  resistor.  This  can  be  adjusted  to  vary  color  intensity.  U/e  strongly 
discourage  this  method  for  the  novice,  and  recommend  you  ask  your  dealer  for  advice  on  "fine 
tuning  "your  color. 

Our  rumor  mill  says  these  problems  will  be  corrected  in  the  version  of  VIC  that's  fully  FCC  approved. 
These  units,  scheduled  to  begin  shipment  in  late  July  or  August,  have  an  improved  video  circuit  and  better 
shielding.  A  modulator  (for  connection  to  your  T\/)  will  no  longer  be  standard  equipment.  It  will  now  cost  you 
an  extra  S29.95.  And  that's  the  state  of  the  color  question  at  the  moment.  If  your  "Rainbow"  machine  isn't 
making  rainbows,  we  suggest  a  heart  to  heart  chat  with  your  dealer.  In  our  opinion  Commodore  should 
provide  those  of  you  with  an  "early  model  color  problem"  with  a  cheerful  upgrade. 

Where's  Our  Software? 

Although  Commodore  has  been  expressing  proper  concern  for  getting  support  to  all  of  you  outside  software 
vendors,  our  feedback  from  the  field  has  been  quite  the  reverse.  Several  of  the  established  software  houses 
have  vented  displeasure  with  the  lack  of  support  and  information  available  from  VIC  headquarters.  We'd  like  to 
hear  from  more  software  vendors,  and  to  also  hear  from  Commodore  on  plans  to  truly  \nii\ate  some  support. 

New  Products  And  Reviews 

Next  issue,  we'll  start  our  New  Products  section,  bringing  you  timely  information  on  the  latest  developments 
in  the  world  of  the  VIC-20.  You'll  also  enjoy  our  Reviews  section;  careful  and  fair  analysis  of  new  products, 
with  the  goal  of  helping  you  make  informed  buying  decisions. 
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Exploring  The  Rainbovi^  Machine 

A  Beginner's  Guide  ...  To  Tlie  VIC  (Part  i) 

Ramon  Zamora  and  George  Firedrake 
Palo  Alto,  CA 


PreRamble 

Let's  begin  with  dragons.  George 
and  Ramon  are  two  of  the  many 
Dragons  of  Menio  Park.  They  are 
friends  of  Bob  Albrecht,  known 
throughout  the  world,  by  both  kids 
and  adults,  as  (he  Dragon.  (Many 
people  believe  that  Bob  is  a  real 
dragon,  temporarily  disguised  as  a 
human,  so  that  we  will  listen  to 
what  he  has  to  say  about  kids  and 
learning.) 

George  Firedrake  and  Bob  sre 
old,  old  friends  and  claim  to  have 
adventured  together  several  thou- 
sand years  ago.  George  is  often 


overheard  singing  parts  of  an 
elaborate  dragonsong  about  their 
escapades.  Together,  George  and 
Bob  have  experienced  a  dream  of  an 
important  task  to  be  done.  They  are 
to  find  as  many  dragonfriends  as 
possible  and  create  dragonstories 
that  help  the  people  of  the  planet 
Earth,  especially  kids,  acquire  knowl- 
edge and  mastery  of  the  planet's 
new  technologies. 

Ramon  appears  to  be  a  young 
dragon.  Although  he  says  he  is  only 


a  few  hundred  years  old  (a  span  of 
time  that,  to  a  dragon,  is  hardly  any 
time  at  all),  Ramon  is  a  creator  of 
dragonsongs  and  dragonstories  that 
reach  beyond  his  years. 
(Hmmm... perhaps  he  is  older  than 
he  looks.) 

Recently,  Bob  and  Ramon  have 
been  busy  establishing  a  new  form 
of  learning  environment  in  the 
MenIo  Park  Public  Library,  called 
ComputerTown,  USA!,  and  building 
various  dragonlairs  about  the 
community. 

What  does  all  this  dragon  stuff 
have  to  do  with  a  column  about  the 
new  VIC  computer?  Well,  dragons 
3r€  not  fond  of  divulging  their  larger 
plans;  they  like  to  let  events  unfold 
as  they  may.  But,  George  has  let  it 
be  known  that  he  feels  that  the  new 
VIC  is  an  important  tool  for  kids, 
parents,  and  teachers  to  start  to  use. 
He  claims  that  the  color,  sound,  and 
graphics  features  of  the  VIC  make  it, 
for  now,  an  ideal  instrument  on 
which  to  develop  innovative  learning 
materials  about  how  to  use  personal 
computers. 

Whatever  their  reasons,  the 
Dragons  of  MenIo  Park  are  busy 
writing  dragonsongs  and  dragonsto- 
ries on  the  VIC.  What  you  are  about 
to  read  is  part  of  one  of  their  new 
adventurous  explorations  for  begin- 
ners on  [he  computer  they  have 
renamed  the  Rainbow  Machine. 


DragonNotes 
[IVIarch  1981) 


The  Beginning  VIC 
Display 

WARNING  I 

These  columns  arc  written  for 
beginners,  and  for  newconers  to 
computing  and  the  Commodore 
vie  personal  computer.  If  you  are  a 
skilled  computer  user,  reading  this 
material  may  cause  any  one  of  a 
number  of  strange  and  unfjredicta- 
ble  reactrons, 

WARNING! 

What  word  would  you  say  you  use 
for  something  that  is  useful  but  fun? 
Why,  FUNctionai,  of  cou'se!  The 
new  Commodore  VIC  is  a  FUNctionai 
computer.  The  VIC's  Colof,  Sound, 
and  Graphics  features  are  fun  to  use. 
The  same  features  play  a  double  role 
and  help  you  create  usef  jI  applica- 
tions for  your  home,  business,  or 
classroom. 

As  beginners,  you  will  explore 
the  VIC'S  Color,  Sound,  and  Graphics 
so  that  you  teach  yourself  what  the 
VIC  can  do.  The  material  in  these 
columns  can  be  used  by  anyone 
wanting  to  learn  about  tfie  VIC. 
(Anyone  means  both  kid;,  and 
adults.)  You  get  to  work  ai  your  own 
pace.  If  you  like  to  explore  the  VIC 
s-l-o-w-l-y,  then  do  so.  If  you  discover 
that  you  already  know  seme  parts 
being  discussed  then  skip  ahead. 
You  are  in  control. 

Get  ready  for  your  adventures 
with  the  VIC.  If  you  wish,  find  a 
friend  to  work  with  you.  Learning 
about  a  computer  Is  often  more 
enjoyable  (and  you  sometimes  learn 
more)  when  done  with  a  friend. 

If  you  have  not  already  done  so. 
unpack  your  VIC  and.  following  the 
directions  in  the  VIC  user's  manual, 
connect  the  VIC  to  your  TV  s(?t 
When  the  VIC  is  ready  to  go   , 
TURN  ON  THE  VIC 

The  VIC  screen  comes  to  life,  in 
brilliant  color.  (If  the  color  is  not 
brilliant,  perhaps  your  VIC  is  con- 
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nected  to  a  black-and-white  TV  set.] 
Look  closely  at  the  screen  for  a  few 
moments.  Check  to  see  that  the 
display  on  your  TV  appears  like  this 
(we  assume  your  VIC  is  connected 
tea  color  TV): 


^^  JfX-CBM  BASIC  V 
5583  BYTES  FREE- 
REAPY. 


BLUE  cursor) 

The  messages  that  appear 
when  you  first  turn  on  the  V(C 
should  show  up  as  blue  letters  on  a 
wMe  screen.  Around  the  Edge  of 
the  white  central  area  is  a  colored 
border.  The  border  color  is  cy^n. 
Cyan  is  a  lighter  blue  that  has  a 
greenish  hue. 

You  can  ignore  the  first  two 
message  lines.  (Hmmm...did  the  ViC 
misspell  bites?  No,  but  more  on 
bytes  later.)  The  READY  message  is 
the  VIC'S  way  of  saying  to  you  that  it 
is  ready  to  do  something.  You  will 
tell  the  VIC  what  to  do  by  typing  on 
the  keyboard.  In  addition  to  the 


Get  ready  for 

your 

adventures 

with  the  VIC. 


READY  message,  the  VIC  also 
displays  the  blinking  rectangle, 
called  the  cursor,  to  let  you  know 
that  it  is  your  turn  to  type.  The 
position  of  the  cursor  on  the  screen 
indicates  where  what  you  type  is 
likely  to  appear. 


^  ^  ^  -Jf  CB^\  BASIC 
3583  BYTES  Ff2EE 
READY.  ^'-~-- — ^ 


VIC  le  \ 


^   WHEM  You  SEB 
TH^  CURSOR-  rrk 
You/?  TUftN 


The  Keys  To  The  VIC 

The  keyboard  is  your  control  center 
for  talking  to  the  VIC.  Whatever  you 
type  is  sent  to  the  VIC  and,  at  the 


same  time,  placed  on  the  TV  screen 
50  you  can  verify  what  you  are 
entering.  All  the  VIC's  messages  to 
you  are  also  placed  on  the  screen. 
Look  at  the  keyboard  for  a  few 
m/nutes.  The  number  of  keys,  all  the 
graphics  symbols,  and  funny  words 
like  HOME,  CTRL,  and  CRSR  appear 
everywhere. 

The  VIC  keyboard,  however,  is  a 
lot  like  a  typewriter  in  many  ways. 
There  are  letter  keys,  number  keys, 
shift  keys,  and  a  shift  lock  key.  If  you 
are  not  a  typist,  don't  worry.  Most  of 
what  you  are  going  to  enter,  for  a 
while,  only  requires  a  couple  of 
fingers. 

Time  for  your  first  experiment. 
Locate  the  EIIHi  key  on  the  left 
side  of  the  keyboard.  (Note:  There 
are  two  EHHl  keys  on  the  ViC, 
one  on  the  left  and  one  on  the  right, 
near  the  bottom  corners.  Also,  there 
Is  a  Uti^^  key.)  You  want  the 
||;ilai  key  on  the  left.  When  you 
locate  that  key,  hold  it  down  with  a 
finger  on  your  left  hand.  Now,  locate 
this  key: 


With  the  EaHi  key  held 
downwith  your   left  hand,   press 
the  Iffiftfl  key.  What  happens?  Do 
the  messages  on  the  TV  disappear? 
What  does  the  screen  look  like? 


The  VIC  Keyboard 
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key  while 
holding  down  a  hmjJ  key  CLeaRs 
the  screea  Get  it?  The  word  CLR  on 
the  R^ffl  key  comes  from  the 
word  CLeaR,  So  to  clear  the  screen: 
Hold  down   HillJ*  and  press 

EEZSa 
Congratulations!  You  completed  your 
first  communication  with  the  VIC  By 
pressing  the  two  keys,  you  told  the 
VIC  to  do  something,  namely,  clear 
the  screen,  and  the  VIC  cheerfully  re- 
sponded. When  the  screen  is  clear, 
the  VIC  places  the  blinking  cursor  in 
the  upper  left  corner  of  the  display, 
telling  you  that  it  is  again  your  turn  to 
type  something. 

Type  the  following  (press  the 
keys  shown  below): 

Your  screen  should  display: 


How  do  you 

tell  the  VIC 

M/hat  colors 

to  use? 


Each  letter  you  t>'ped  appeared  on 
the  screen,  The  cursor  moved  to  the 
right  one  position  each  time  you 
pressed  a  letter  key  and  sits  at  the  end 
of  the  word.  (Right  now,  it  doesn't 
matter  what  word  you  typed.  So,  if 
you  accidentally  spelled  BLUE  as 
BLEW  or  BLEU  or  BLIP,  you  didn't 
blow  iL) 

You  now  have  the  word  BLUE 
(or  some  word)  in  the  color  blue  on 
the  screen.  Press  the  large  iN^i'iriJi 
key  and  observe  the  TV  display. 

The  message  that  the  VIC  sent  to  the 
screen  can  be  interpreted  as  /  Don't 
Understand  What  You  Typed. 
Anytime  you  enter  something  that 
the  VIC  does  not  understand  the 
SYNTAX  ERROR  message  will 
appear, 


Don't  worry  when  you  see  this 
message.  You  have  not  done  any- 
thing that  will  harm  the  VIC.  (In  fact, 
short  of  standing  on  your  keyboard, 
you  cannot  type  anything  into  the 


VIC  that  will  cause  serious  problems.) 
The  message  appeared  because  the 
VIC  can  only  understand  certain 
words;  it  has  a  limited  vocabulary. 
But,  more  on  that  issue  later.  Back  to 
your  explorations  with  tne  VIC  keys. 

The  VIC  Colors 

Typing  the  word  BLUE  produced  a 
SYNTAX  ERROR.  Typing  the  word  for 
any  other  color  |RED.  GfJEEN,  and  so 
forth)  would  give  the  same  result. 
How  do  you  tell  the  VIC  what  colors 
to  use?  Try  this  experims^nt: 

Hold  down  £2mllJUI  and  press 


The  screen  clears  and  the  cursor 
returns  to  the  top  left  corner  of  the 
display  area. 


Now,  locate  the  key  labeled  Iiicj^ 
Hold  down  the  k^mum  key  and 
press  the  key  with  the  number  3  on 
top. 

Hold  down    Kniiin    and 
press  O 

Look  closely  at  the  screen.  What 
color  is  the  cursor? 
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The  cursor  is  now  red\  Look  again  at 
the  number  3  key;  lool<  at  the  face  of 
the  key.  Do  you  see  the  letters  RED 
on  the  front'?  Ahaf  All  the  number 
keys  from  I  through  8  have  color 
codes  on  their  faces.  Hold  down 
the  tmiim  key  and  press  another 
color  key.  Try  this: 
Hold  down  I^tcj^  and  press  I'i^l 


OAJ7Z?P 


VHl 


Is  the  cursor ye//ow/?  Your  turn: 
change  the  cursor  to  all  the  colors 
indicated.  (What  happens  when  you 
press  the   ■'.'/:>*  key?  Does  the 
cursor  disappear?)  Remember:  you 
must  hold  the  wntun  key  down 
while  you  press  the  color  keys. 


Holding  down  ihe  Wnill^  key 

^nd  pressing  these  keys 

gives  the  following  colors 

rrm    r/Jiii    r7?i    mzi 


black 


while 


(Cll 


cy.fn 


flHTTl     rTTTTl     FTTH      t7?l 

pufpic  green  blue  yedow 

Try  typing  a  few  words  in  the 
various  colors.  Type  RED  in  red; 
PURPLE  in  purple;  CYAN  in  cyan. 
What  about  typing  WHITE  in  white? 
The  screen's  background  co\o(  is 
already  white.  If  you  attempt  to  type 
in  white,  nothing  appears  on  the 
screen.  Try  it!  Send  some  invisible 
messages. 

The  Rainbow  Machine 

Time  to  explore  why  we  call  the  VIC 
the  Rainbow  Machine.  Clear  the 
screen.  (By  now  you  are  probably 
remembering  how  this  part  is  done.) 
Hold  down  ■•'IMa*  and  press 


With  the  Screen  clear,  and  the  cursor 
back  in  the  top  corner,  press  the 


Send  some 

invisible 

messages. 


edge  of  the  screen.  What  happens 
then?  Why,  the  VIC  keeps  on 
drawing  the  black  bar  on  the  next 
line.  Let  the  VIC  draw  until  you  get 
two  full  lines  or  so.  on  the  screen, 
then  release  the  SPACE  bar. 


following  keys: 

Hold  down  KniiiM  and  press 
|:H:f  ,  then  hold  down 
and  press  L^!^22UJ 


CUHSOR. 
72>  BUiCM 


•CTRL 


WMATs 

Pa  F 


OKI  Now,  locate  the  SPACE  bar.  It  is 
the  large  bar  at  the  bottom  of  the 
keyboard.  When  pressed,  it  normally 
produces  a  space  on  the  TV  display, 
just  like  a  typewriter  produces  a 
space  on  a  piece  of  paper. 

Press  the  SPACE  bar  and  hoM  it 
down.  What  happens?  Is  the  VIC 
drawing  a  black  bar  across  the 
screen? 


Now,  change  to  another  color. 
For  example,  change  RED. 
Hold  down    I^tN^  and  press  Iti^'J 

Press  the  SPACE  bar  once  again.  A 
red  bar  begins  to  appear.  Keep 
drawing  bars  and  changing  colors 
until  the  screen  is  filled  with  the  VIC 
Rainbow. 


Continue  holding  the  SPACE  bar 
down  until  the  bar  reaches  the  right 


You  can  use  the  VIC  Rainbow  to 
adjust  your  TV's  color  settings.  Tune 
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the  TV  to  the  colors  that  look  best  on 
your  screen. 

When  you  finish  making 
rainbows,  do  this; 


Hold  down  I^iiJl and 

press  as^m 


CTRL 


m 


rue  ? 
Nutn&£fi 


t? 


THIS 
ONE  s^ys 


This  action  sets  the  VIC  SPACE  bar 
back  to  normal.  Pressing  the  SPACE 
bar  after  you  press  the  ict'j-g'^jJ  key 
now  puts  a  space  on  the  screen.  You 
will  have  other  chances  to  experf- 


...  you  vi^ill 

find  a  mystery 

exercise  that 

you  type  into 

the  VIC. 


ment  with  RVS-ON  and  RVS-OFF  as 
you  progress  through  this  material. 

VIC  Mystery  Experi- 
ment #1 

Up  to  this  point  you  have  explored 
or  experimented  with  these  VIC 
features: 

•Thecuraor 

•The  fclliial  key 

*The    ■N:iiilr<.'l  key 

'Clearing  the  screen 


*RVS-Or\l 
•SYNTAX  ERRORS 
'Typing  words 

*  Color  keys 
*The  SPACE  bar 
•The  mm   key 
•RVS-OFF 

•  Rainboiw-Makl  ng 

At  the  end  of  each  column  in 
this  series  you  will  find  a  mystery 
exercise  that  you  type  into  the  VIC, 
and  that  leads  into  material  in  future 
columns.  Here  is  Mystery  Experiment 
#  I .  Clear  the  VIC's  screen  (by  now, 
you  know  how  this  is  donf),  Type 
the  following  into  the  VIC.  If  you 
make  a  typing  mistake,  press  the 
icj=ntjfj.^i  key  and  retype  the  line. 
Experiment  and  see  what  you  getl 


You  type; 
The  VIC  shows: 


^  V 

SHIFT  SHIFT  SHIFT  SHIFT  SHIFT  SHIFT 

0  [o]  [T]  □[s^c^Q  @  [k]  □  Q  [Return 

10?"      (SPACE) 


You  type: 
The  VIC  shows: 


HHH[0][l][0][l]H    I  '^^TURN 


You  type: 


R         U         IM         RETURIM 


The  VIC  shows;       This  Is  the  mystery  part! 


Hint#1: 

you 

Bluebirds 

Hint  #2; 

Press      ^^Qp      to  "stop"  the  mig rati 

Hint  #3; 

Type         R         U         IM         RETURN 

Have  fun  with  your  VICi  See 

next  time. 

to  re-start  the  migration. 
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VIC  As  Super  Calculator 


Jim  Butterfield 
Toronto,  Canada 


Everyone  knows  that 

you  can  load  programs  into  the  VIC 
and  get  some  pretty  clever  things  to 
happen.  Don't  forget  that  you  can 
also  do  useful  tasks  with  your  VIC 
without  any  programs  at  all. 

The  technique  is  called  Direct 
Statements.  These  are  lines  that  you 
type  without  a  number  at  the 
beginning.  For  example,  if  you  type 
PRINT  "HELLO"  orjust  ?  "HELLO" 
for  short,  VIC  will  obligingly  print 
HELLO.  Not  too  useful,  but  we're 
just  warming  up  for  the  good  stuff. 
Quick  arithmetic  is  easy  to  do. 
To  add  five  and  six,  type  PRINT 
5  +  6.  It  works  just  as  you  expect 
it  to. 

VIC  uses  an  *  (asterisk)  character 
to  signify  multiplication,  and  a  / 
(slash)  for  division.  So  PRINT  2*3/4 
gives  you  an  answer  of  1 .5  as  you 
would  think.  By  the  way,  you'll 
quickly  learn  that  VIC  ignores  spaces: 
PRINT  Z  *  3  /  4  gives  the  same  result, 
and  you  may  feel  that  it's  neater. 

When  you  start  mixing  multipli- 
cation/division with  addition  and 
subtraction  you'll  need  to  get  used 
to  a  quick  VIC  trick:  it  always  performs 
the  multiplication  and  division  first. 
This  means  that  PRINT  2*3  +  4*5  will 
produce  26  (six  plus  twenty),  not  50 
as  you  might  think  at  firsL  If  you 
really  multiply  by  five  you  can 
always  force  VIC  to  see  things  your 
way  by  using  brackets:  PRINT 
(2*3  +  4)*5  makes  it  work.  You  can 
use  multiple  brackets  if  you  wish: 
PRINT  ((2  +  3)*4)  +  5  is  quite  accept- 
able, and  PRINT  (2  +  3)*(4  +  5) 
produces  the  expected  answer  of 
five  times  nine  or  45.  Remember  that 
you  must  close  the  brackets  as  many 
times  as  you  open  them,  or  you  may 
get  the  dreaded  7SYNTAX  ERROR 
notice  that  tells  you  that  you've  done 
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VIC  has  special 

functions  similar 

to  an  advanced 

scientific  calculator. 


something  dumb.  If  you'd  rather  be 
exact  about  brackets  and  call  them 
parentheses,  that's  OK  —just 
remember  to  use  them  correctly. 

You'll  quickly  discover  that  you 
can  raise  a  number  to  a  power  with 
the  upward  arrow:  PRINT  2^3  gives 
you  two  cubed,  which  is  eight. 
Powers  are  always  performed  before 
multiplication,  division,  addition  or 
subtraction  —  unless  you  use 
brackets.  By  the  way,  you'll  discover 
that  powers  of  a  number  have  one 
very  nice  feature:  the  sign  of  a 
number  is  handled  correctly  in 
almost  all  cases.  If  you  have  a 
mathematical  bent,  you  can  probably 
guess  what  will  happen  if  you  raise 
a  number  to  a  fractional  or  negative 
power;  if  you  don't,  you  might  like  to 
try  it  anyway  and  see  what  happens. 
One  last  thing  about  powers:  they 
don't  work  out  exactly  in  all  cases: 
three  raised  to  the  fourth  power 
might  give  you  a  value  just  a  shade 
higher  or  lower  than  81 . 

We've  still  only  just  begun.  VIC 
has  special  functions  similar  to  an 
advanced  scientific  calculator.  For 
example.  PRINT  SOR(5)  calculates 
and  prints  the  square  root  of  five. 
You  have  quite  a  few  trigonometric 
functions:  SIN,  COS,  TAN  and  the 
arctangent  ATN  if  you  need  them, 
but  be  careful:  they  are  worked  from 
angles  in  radians.  If  you  measure 
your  angles  in  degrees,  be  sure  to 
convert  using  a  factor  of  pi/180:  for 

HQme  and  Educational  Computing 


example,  the  sin  of  30  degrees  is 
calculated  with:  PRINT  SIN(30*rr/l 80). 
For  the  math  whiz,  there  are  loga- 
rithms and  exponentials  using  the 
LOG  and  EXP  functions,  (fyou  use 
these,  you'll  need  to  know  that  they 
are  natural  logarithms.  If  you  prefer 
to  use  unnatural  logarithms  (base 
1 0),  use  a  factor  of  LOG(  1 0)  to  divide 
or  multiply;  the  common  log  of  two 
can  be  calculated  with  PRINT 
LOG(2)/LOG(10j. 

Memories 

Calculators  use  memories:  and  VIC 
the  super-calculator  gives  you  lots  of 
memory.  You  get  to  name  your 
memory:  type  A  =  1  7  and  the  value 
of  I  7  stored  into  a  memory  location 
called  A.  Later,  you  can  use  this 
value  in  other  calculations  such  as 
PRINT  A +  9.  You  can  change  the 
memory  value  at  any  time  with  a 
statement  like  A  =  1 4.  You  can  add 
or  subtract  to  it  with  unusual  (at  first) 
syntax  such  as  A= A -t- 4  or  A  =  A- 1 1. 
When  you  do  this  kind  of  thing, 
remember  that  the  new  value  is  set 
only  after  the  calculation  is  complete. 
So  if  A  equals  5,  the  expression 
A  =  A*3-A  would  calculate  five  times 
three  minus  five,  and  then  set  the 
result  (ten)  into  memory  location  A. 

You  may  name  memory  loca- 
tions (called  "variables"  in  the  VIC) 
almost  anything  you  like:  for  exam- 
ple, HENRY=  7  will  work.  You'll  be 
much  better  off  to  use  a  single  letter 
(A,  B,  C,  etc.)  or  a  letter  followed  by  a 
number  (D9,  M4,  etc.)  since  VIC  can 
get  confused  with  certain  combina- 
tions of  letters.  For  example,  TANK 
would  get  mixed  up  with  the  TAN 
function. 

One  last  thing:  memory  can  get 
wiped  out  very  easily  in  the  VIC. 
Certain  commands  like  NEW  and 


CLR  will  do  it;  and  typing  in  any  line 
starting  with  a  number  will  clear  all 
the  variables.  Be  careful. 

Multiple  Calculations 

If  you  want  to  calculate  several 
things,  you  can  do  it  with  a  single 
PRINT  command.  Just  put  a  semicol- 
on (;)  or  a  comma  (J  between  the 
espressions  you  want  to  calculate. 
For  example:  PRINT  3  +  5,3*5,3/5 
calculates  three  values  and  prints 
them  neatly  on  a  single  line.  If  you 
used  the  semicolon:  PRINT 
3  +  5;3*5;3/5  the  values  would  be 
printed  close  together  rather  than  in 
neat  columns. 

You  can  put  several  commands 
together  on  a  single  line,  separated 
by  a  colon  (:)  character.  To  add  a 
value  of  one  to  variable  X,  and  then 
print  X  +  4,  you  might  code:  x  =  X  +  I , 
and  then  print  X  +  4.  The  colon  will 
separate  the  statements  so  that  VIC 
will  understand  that  they  are  to  be 
performed  separately. 

Repeating  Calculations 

If  you  can  ask  VIC  to  do  something 
once,  you  ask  for  the  same  calcula- 
tion to  be  performed  many  times.  All 
you  need  to  do  is  put  the  job  you 
want  done  between  the  two  fol- 
lowing statements:  FOR  J=  1  TO  ... : 
.,.  (your  statement) ... :  NEXT  J. 

Beginners  like  to  see  their  name 
printed  many  times.  They  should 
code:  FOR  J=  I  TO  iOO  :  PRINT 
"JOE"  :NEXT  J  to  have  the  name 
JOE  printed  one  hundred  times. 
Since  each  name  is  printed  on  a 
separate  line  of  the  screen,  there 
won't  be  room  for  all  those  JOEs. 
Tfy  changing  the  PRINT  statement  by 
adding  a  little  extra  punctuation 
behind  JOE  —  for  example  PRINT 
"JOE",  with  a  comma,  or  PRINT 
"JOE";  with  a  semicolon.  You  have 
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a  lot  of  control  over  how  things 
appear  on  the  screen. 

It  doesn't  seem  to  make  much 
sense  to  print  a  fixed  calculation 
such  as  the  square  root  of  ten  over 
and  over  again.  We  have  much 
more  flexibility  than  that.  As  the 
central  statement  repeats,  the  value 
of  the  variable  (J  in  the  eKample 
above)  will  step  through  the  values 
we  have  shown  ( !  to  1 OOJ.  You  may 
use  this  variable  as  a  memory  value 
and  calculate  with  it.  To  print  a  table 
of  the  square  roots  of  numbers  from 
ten  to  twenty,  code:  FOR  J  =  1 0  TO 
20  :PRINT  J,SQR(J)  :NEXT  J  and  the 
job  will  be  done. 

Remember  that  everything 
between  the  FOR  and  NEXT  state- 
ments will  be  repeated  with  the 
value  of  the  variable  (J  in  this  case) 
stepping  through  Its  range.  Don't 
forget  that  you  can  use  any  variable 
name  you  like:  FORM  =  3  TO  7  is 
perfectly  good  so  long  as  you  say 
NEXT  M  at  the  point  that  you  want 
to  go  back  and  repeat. 

Summary 

Direct  statements  are  a  good  way  to 
learn  some  of  the  simple  rules  of 
Basic,  and  they  are  handy  for  quick 
calculations,  too. 

When  you  start  writing  BASIC 
programs,  you'll  find  it  handy  to  tfy 
some  of  the  program  lines  as  direct 
statements  first,  to  make  une  that 
they  work  properly.  And  i'your 
program  gives  you  trouble  and 
stops,  you'li  find  that  statements 
from  the  program,  entereij  in  Direct 
mode,  can  give  you  a  hint  as  to 
what's  going  on. 

But  no  matter  how  advanced 
you  get  in  your  programming 
adventures,  don't  forget  what  a 
zippy  little  calculator  you  liave  at 
your  fingertips. 


10 


Home  and  Educational  Computing 


Summer,  1981 


Custom  Characters  For 

The  VIC 


^^^  _^  ^^  of  the  many  innova- 
^^nC  tJons  built  into  the 
new  Commodore  VIC  is  the  ability  to 
design  our  own  special  characters 
and  have  them  available  to  BASIC 
programs.  The  possible  uses  are 
many.  Now  you  can  have  different 
language  fonts,  such  as  Japanese, 
Chinese,  or  Arabic.  You  can  display 
electronic  schematic  symbols.  Or, 
you  can  write  a  program  that 
transcribes  stenographic  characters 
into  English.  Greek  alphabet  charac- 
ters sre  now  available  for  tutorial 
math  programs  requiring  special 
symbols.  You  can  even  design  your 
very  own  space  invader  creatures. 

This  article  explains  how  to 
make  these  custom  characters.  It 
also  presents  a  utility  program  to 
make  the  job  of  designing  these 
characters  and  incorporating  them 
into  your  BASIC  programs  quite  easy 
and  straightforward.  Finally,  a 
sample  program  is  given  that  dem- 
onstrates the  custom  character 
features  of  the  VIC  by  displaying  all 
of  the  special  math  symbols  of  the 
Greek  alphabet. 

VIC  Character  Sets 

The  character  set  to  be  used  by  the 
VIC  is  determined  by  the  value  in 
location  36869.  (Note:  all  locations 
are  given  in  decimal).  This  is  similar 
to  location  S9468  in  the  PET  or  CBM 
machines.  The  various  VIC  character 
sets  specified  by  POKEing  this 
location  are  as  follows: 
POKE36869,240  gives  upper 
case  and  graphics  (when  shifted) 
POKE36869,242  gives  lower  case 
and  upper  case  (when  shifted) 
POKE36869,255  cause  the  VIC  to 
set  aside  the  first  64  characters  of  the 
character  set  as  user  defined  charac- 
ters. These  special  characters  will  be 
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determined  by  values  in  the  5 1 2 
locations  beginning  at  7168. 

VIC  Character 
Representation 

To  understand  how  to  design  your 
own  VIC  characters,  you  must  first 
understand  how  the  VIC  represents 
its  characters  internally.  Just  how 
this  IS  done  was  demonstrated  by 
Jim  Butterfield  in  his  article  in  the 
April  1981  issue  of  COMPUTE!  Jim 
pointed  out  that  the  two  "normal" 
character  sets  can  be  located  by 
using  the  following  equation: 

CHRflJ  =  32768  +  B  +  8*1 
where  B  =  0  for  the  upper/ 

graphics  set 
and  B  =  2048  for  lower/upper 

characters 
and  I  =  the  "screen  POKE"  value  of 
the  character 
{e.g.,  (Si  is  0,  A  is  T ,  B  is  2,  etc.) 

As  an  example,  let's  look  at  how  the 
VIC  stores  an  upper  case  "A."  It  has  a 
"screen  POKE"  value  of  I ,  so  by 
using  the  above  equation  we  see 
that  it  is  stored  in  the  eight  consecu- 
tive bytes  beginning  at  location 
32776.  If  we  were  to  PEEK  these 
locations,  we  would  find  the  follow- 
ing decimal  values  —  which  have 
the  specific  bit  patterns  which  define 
the  pixel  (i.e.,  dot)  pattern  the  VIC 
uses  when  its  prints  an  "A." 
The  bit  pattern  corresponds  to  the 
binary  representation  of  the  decimal 
number  found  in  the  location.  For 
example,  location  32782  contains  a 


BYTE  DECIMAL  BIT  PATTERN 

LOCATION  VALUE      7   6   5   4   3    2    10 

32776  24 

32777  36         •      • 

32778  66       •  - 

32779  126       ...... 

32780  66       •         • 

32781  66       •         • 

32782  66       •         • 

32783  0 

decimal  66  which  is  0 1 0000 1 0  in 
binary  —  i.e.,  the  pattern  at  the 
bottom  of  the  VIC's  representation  of 
an  "A". 

Defining  Your  Own 
Characters 

Let's  see  how  you  would  go  about 
designing  and  incorporating  your 
own  custom  character  into  a  BASIC 
program.  For  example,  let's  add  the 
following  vicious-looking  creature  to 
your  version  of  Space  Invaders  or 
Dunjonquest. 

PIXEL  PATTERN 

7  6  5  4  3  2    10  BINARY  DECIMAL 

ROWO    .                                  '  10000001  129 

ROW1     .             .    .             .  10011001  153 

ROW2         •    •             •    •  01100110  102 

ROWS              •    •    •    •  00111100  60 

ROW 4    ........  11111111  255 

ROWS             ....  00111100  60 

ROW6         .                       .  01000010  66 

ROW7        *                     *  01000010  66 

The  binary  and  decimal  values 
corresponding  to  the  creature's  pixel 
pattern  are  also  given.  To  get  the  VIC 
to  use  this  pattern  as  one  of  its 
characters,  let's  enter  and  run  the 
following  short  program: 

100  X  =  PEEK(S6)-2:  POKE  52,X:  POKE 

56,X:  POKES1  ,PEEK[55):  CLR 
110   CS  =2S6*PEEK(52)  +  PEEK(SI) 
120    FORI  =  CSTOCS  +  S11:POKEI, 

PEEK|I  +  32768-CS):  NEXT 
130   FORI  =  0  TO  7:  READ  J:  POKE 

CS  +  I,J;NEXT 
140    DATA  129,153,102,60,255,60, 

66,66 
150   POKE  36869,255:  PRINT'CLR" 
160   FORt=  1  TO  1 1 :  PRINrVf)  "0; 
NEXT 
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After  running  the  program  you 
should  see  a  row  or  1 1  of  your 
creatures  on  the  top  line  of  the 
screen. 

Let's  review  this  program  line- 
by-l/ne  to  understand  how  to  use 
these  special  characters  in  other 
programs.  Line  100  PEEK'S  two 
pages  lower  (a  page  is  256  bytes). 
Line  1 00  also  changes  the  pointer  to 
the  beginning  of  the  str/nng  variables 
(locations  5 1  and  52}  to  point  to  the 
beginning  of  these  two  pages.  The 
CLR  resets  the  user  RAM  boundaries 
so  that  these  two  pages  are  protected 
from  the  rest  of  the  BASIC  program. 
Line  1 10  calculates  the  starting 
location  for  the  table  containing  the 
new  character  set. 

Line  120  transfers  the  first  65 
characters  of  the  standard  upper 
case  character  set  from  ROM  into  the 
new  character  set  table  in  the  top 
two  pages  of  user  BASIC  RAM.  This 
is  not  strictly  required,  but  It  is  good 
practice  because  it  allows  you  to 
have  access  to  "normal"  characters 
as  well  as  your  specially  designed 
charcters  on  the  same  screen. 

Line  130  reads  the  data  in  line 
1 40  that  defines  the  pixel  pattern  for 
the  creature  and  POKEs  it  into  the 
table  space  used  by  the  first  character 
of  the  new  character  set,  i.e.,  the 
table  space  used  by  the  "@  "  sign  in 
the  normal  upper  case  chaocter  set. 
Line  1 50  tells  the  VIC  to  use  the 
custom  character  set  where  the  first 
64  characters  are  user  defined.  Line 
1 60  tries  to  print  a  row  of  (5  's  but 
ends  up  printing  your  creature 
because  its  pixel  pattern  is  in  the 
table  where  the  @  would  normally 
be  located. 

You  could  continue  to  add  to 
this  simple  program  to  build  a  com- 
plex game  that  would  use  your 
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creature  whenever  you  PRlNTed 
"(S  "  or  POKEd  the  screen  with  a 
zero  (i.e.,  the  @'s  normal  screen 
POKE  value).  To  return  to  the  normal 
character  set.  give  the  direct  com- 
mand: POKE  36869.240  which  will 
cause  all  your  creatures  to  be  trans- 
formed back 
to  C«  's. 

A  Utility  Program 

Listing  1  is  a  short  BASIC  program  for 
the  VIC  which  helps  with  the  design, 
testing,  and  coding  of  special 
characters  by  essentially  automating 
the  process  described  above.  The 
program  has  two  operaUor\  modes: 
( 1 )  a  review  mode  which  allows  you 
to  see  how  the  current  character  set 
looks  —  including  your  custom 
characters,  and  (2)  an  editing  and 
new-character  definition  mode. 

Review  Mode 

When  you  first  run  the  program  in 
listing  I  you  will  initially  be  in  the 
review  mode  and  the  screen  will 
look  like  this: 


(II ABCDEFG 

OPTIONS 

HIJKLMNO 

PQRSTUVW 

NEW  CHAR 

XYZ[£] 

E  EDIT  CHAR 

mr#s%&- 

OQUIT 

()*  +  .-/ 

01234S67 

89;;<  =  .? 

The  characters  shown  in  the  first 
eight  rows  and  eight  columns  of  the 
screen  are  the  currently  defined 


custom  character  seL  Note  that  you 
start  the  program  with  the  normal 
upper  case  characters.  As  you 
redefine  the  characters.  :he  new 
characters  will  be  displayed  in  their 
appropriate  place  in  this  character 
table.  For  example,  if  we  had  used 
the  utility  program  to  crc'cite  the 
creature  in  the  previous  example  it 
would  be  displayed  in  place  of  the 
(a  sign  whenever  we  were  in  the 
review  mode. 

The  blank  in  the  first  column  of 
the  fifth  row  will  be  red  and  serve  as 
a  "fake"  cursor.  You  will  be  able  to 
use  all  normal  cursor  controls, 
including  HOME  and  CLR  to  position 
this  fake  cursor  on  any  of  the  charac- 
ters displayed  in  the  character  set. 
This  fake  cursor  will  also  have 
automatic  repeat  key  snci  automatic 
wraparound  features. 

To  define  a  new  special  charac- 
ter, move  the  fake  cursor  to  the 
position  of  the  character  in  the 
normal  character  set  you  wish  to 
replace.  A  good  idea  is  to  replace 
characters  that  are  seldom  used,  so 
that  you  still  have  access  to  the  more 
popular  characters,  i.e.  the  letters 
and  digits.  Once  the  cursor  is  posi- 
tioned, hit  "N"  on  the  keyboard  to 
define  a  new  character  in  place  of 
the  one  the  cursor  is  on.  If  you  are 
just  reviewing  a  character  that  you 
have  previously  created  and  decide 
it  needs  more  work,  then  position 
the  cursor  on  the  character  and  hit 
"E".  Either  "E"  or  "N"  will  shift  the 
program  into  the  EDIT  mode. 

Edit  Mode 

As  an  example,  let's  assume  that  you 
wanted  to  add  serifs  to  tiie  character 
"K",  After  placing  the  red  cursor  over 
the  Kyou  would  hit  an  "E"  to  enter 
the  Edit  mode,  and  the  screen 
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would  look  like  this; 

■.*...*. 

OPTIONS 

*   * 

+  ADD  DOT 

_-•*-..- 

-ERASE 

*    • 

=  UPDATE 

*     * 

B  BASIC 

*       * 

R  REVIEW 

QOUIT 

The  screen  shows  the  pixel  pattern 
for  the  character  K  in  a  large  8-by-8 
format.  The  cursor  is  "homed,"  but 
may  be  repositioned  using  the 
cursor  control  keys  to  rest  on  any  of 
the  large  pixels.  Once  the  cursor  is 
properly  positioned,  a  pixel  may  be 
"turned-on"  by  hitting  a"  +  "  or 
"turned  off"  by  hitting  a  "-"  sign. 
After  you  are  satisfied  with  your 
handiwork,  hit  an  "  =  "  sign  to  put 
that  character  into  the  character  set 
table.  Then  if  you  wish  to  see  the 
character  in  its  normal  size  and 
format,  hit  an  "R"  to  go  back  to  the 
Review  mode. 

After  the  design  of  the  special 
character  is  complete,  you  may  hit  a 
"B"  to  have  the  VIC  print  the  BASIC 
code  needed  to  add  this  character  to 
other  programs.  For  example,  if  we 
had  used  this  utility  program  to 
design  the  creature  used  in  the 
previous  example,  and  we  hit  a  "B", 
the  VIC  would  display  the  following 
lines  of  BASIC  code: 

200   READ  X:  FOR  I  =  X  TO  X+  7:  READ 

Y:  POKE  X,Y:  NEXT 
210   DATA  7168,  129,  153,  102,  60, 

66,66 

You  will  recognize  that  these 
lines  of  code  are  essentially  equiva- 
lent to  lines  130-140  in  the  previous 
example.  IMPORTANT  — these  lines 
of  code  will  only  work  if  lines  1 00- 


,..  two  challenges 

to 
programmers ... 


1 20  in  the  previous  example  or  their 
equivalent  have  already  been 
executed.  Listing  2  gives  an  example 
of  how  the  BASIC  code  generated  by 
this  utility  program  might  be  used  to 
incorporate  a  number  of  special 
characters  (specifically  the  math 
symbols  in  the  Greek  alphabet)  into 
a  BASIC  program. 

A  word  of  caution  —  hitting  a 
"B"  or  an  "R"  will  both  generate 
displays  based  on  what  is  actually  in 
the  character  set  data  table.  This  may 
not  correspond  to  the  current  large- 
sized  pixel  pattern.  Always  be  sure 
this  table  is  correct  by  updating  it  via 
the  "  =  "  command  prior  to  using  the 
"B"  or  "R"  commands. 

Hitting  a  "Q"  while  in  either  the 
Edit  or  Review  modes  will  cause 
both  the  memory  size  and  the 
character  set  to  be  reset  to  their 
normal  states  and  the  program  to 
end. 

A  Few  Suggestions 

If  you  want  to  use  a  custom  pattern 
that  is  larger  than  just  one  character, 
use  the  utility  program  to  design  the 
pieces  of  the  overall  pattern  into 
contiguous  characters,  as  shown  in 
the  Review  mode  display.  For 
example,  if  you  want  a  3-across  by 
2-down  pattern,  you  could  use  the 


utility  program  to  design  the  various 
parts  into  the  character  positions 
normally  occupied  by  @.  A,  B.  and 
H,  I,  J.  Then  whenever  you  PRINTed 
these  characters  in  your  BASIC 
program  (in  the  correct  configuration 
—  of  course)  you  would  get  your 
desired  large  custom  pattern. 

If  the  reverse  character  flag  is  on 
(I.e.,  the  character  you  are  PRINTing 
has  been  preceded  by  a  reversed 
"R")  the  VIC  will  use  the  standard 
character  set  and  not  the  custom 
character  set.  You  will  find  this  useful 
when  you  have  already  redefined 
various  characters,  and  you  want  to 
use  those  same  original  characters 
on  the  same  screen.  You  can  simply 
PRINT  those  characters  in  reverse. 
This  "trick"  is  used  in  the  Review 
mode  of  the  utility  program  to  assure 
that  the  options  are  always  printed 
properly. 

Programming 
Challenges 

Here  are  two  challenges  to  pro- 
grammers who  would  like  to  show 
they  have  mastered  the  VIC's  custom 
character  features  and  who  want  to 
write  very  useful  programs  that  can 
be  used  and  enjoyed  by  the  growing 
VIC  community:  ( 1 )  Write  a  program 
that  will  draw  a  straight  line  (or  as 
close  to  one  as  possible]  between 
any  two  pixels  on  the  VIC's  screen. 
(2)  Write  a  generalized  graph  pro- 
gram that  can  graph  equations  (one 
or  more  simultaneously)  in  high 
resolution  by  defining  special 
characters  —  on  the  fly  —  as  the 
shape  of  the  equations  require  them. 


Table  1 


100  P0KE36879.2?:PRINT"n  CHftRflCTER   GENERATOR" 

110  PRIHT":<W     BV  DI^VID  MflLMBERG" 

120  REM   43064   VIA  MORRGfl 

130  REM   FREMONT..    CflLIFORNIfl 

148  X=PEEK';5S>-2  :  P0KE52.  X  ■  P0KE56..  K  ■  P0KE51 ,  PEEK<55>  :  CLR 
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150  CS=256+:PEEK(.-52.-)+PEEKC51> 

160  F0RI=CST0CS+5n  -POKEI ..  PEEKa+3£?6S-C:^;  ^MEXT 

178  3=7680: CL=22 

1 30  CR=0  :  LH=280  ^  P=  1 2" :  EG=3  :  ER=  1 

lyy  FCiKE3So79..EG*ie+ER 

200  DEFFNfi|cKk':)=S+R*CL+C:REM  SCREEN  POKE  LnCflTinM 

210  riEFFNBCXX;'=a*R+C:REM  SCREEN  POKE  VALUE  FHR  CHflRRCTER 

220  G0T05S€i 

230  PRIHT'TI"  GOSUBSIO 

240  PRIMT"S":  •FORI=0TO7  PRINT" "  HEXT  F=0 

250  PRINT",i«":R=0:C=0 

260  Z=FNR(:0> 

270    IFF=0THEHPuKE2..  PEEK';Z>  +  i  28  ■  G0T031 0 

290    IFZ=ZLTHEH300 

290   POKEZL,.  IL  :  POKEZL+30720..  BC :  ZL=Z  :  IL^PEEKCZL') 

300  POKEZ ..  32  ■  FOh::EZ+30720 .  2 

310  GETfif    IFfl*=""THEH310 

520  IFF=0THEHpnKEZ..  PEEK'f'Z  i-12S 

330  REM  CURSOR  CONTROL  OPTIONS 

340  IFR*="Q"THENP0KE56..  PEEK ■;56>+2:p0KE36363. 240  :PRIHT".T':EHD 

358  I fh$= " H" flNBC=?THENC=0 : GOTO260 

368  IFR*="H"THENC=C+1 :G0Tn268 

370  IFf=lf="||"flNriC=0THENC=7  GDTO260 

330  I Fflf  = "  II" THENC=C- 1  :  G0T026e 

390  IFflJ=";S"l=IHrR=7THENR=Ci  GOTO260 

408  IFH$:="1!!"THEHR=R+1  :  GOTO260 

410  IFR*="T'RNIiR=0THENR=7  :  GOTO2e0 

420  IFfl$="T'THENR=R-l  GOTO260 

430  IFfl:t="a"THEN250 

440  IFF=1THEN540 

458  REN  DEFINE  NEW  CHflRRCTER  OPTIONS 

460  IFR*="+"THENP0KEZ,31 : GOTO260 

470  IFfl*="-"THENPOKEZ..46:GOTO260 

48e  IFfl$="="THEN6S0 

490  IFFi*=".T'THEN240 

500  IFfl$="R"THEN580 

510  IF]=t*="E"THEN770 

520  GOTO260 

538  REM  REVIEW  CHflRRCTER  SET  OPTinHS 

540  CR=FHBC0:) 

550  IFfl*:="N"THENP0KE36S63  .  240  :  GDTO230 

560  IFPI*="E"THENPOKE368e9,240--F=0:GOTO730 

570  GOTO2b0 

530  P0KE36369 .  255  P=4  ^  C=0 '  ZL=FNfl  ■  0  ■)  '  I  L=32 

598  PRIWT":TBflBCDEFG"  :FRINT"HIJKLNM0"  :PRINT"PQRSTUVW"  :PRINT"XVZi:'-]  t-^"  F=l 

600  PRINT"  !  "+CHRf. :  34  :)  +  "#l:";fi-":  PRINT"  (;:■*+,-.,'"■  PPINT"01 234567"  :PPINT"S'5  ., 

610  PRINT"a"SPC(  12:).;  "aOPTIONSS"  :PRIHT 

620  PRINTSPCCIO.),  ""SIJ  NEN  CHRRl" 

630  PRINTSPCao:).;"SE  EBIT  CHflRl" 

640  PRINTSPC(10).;"!IQ  QUIT"" 

650  EC=PEEK'; 38400) 

€60   GOTO260 

£70   REM  URBflTE  CHflRflCTER  DflTfl  IN  TABLE 

630  RRIHT"^" ;  '  ;:=CS+S*CR  :  FORR=0TO7  :SH=0  Fnpr:=HTn7  :  ri=7-C 

690  £M=Sri-2tD*''PEEK<FMfl<:0>  >=31  ;■  ■  NEXTC 

700  POKE!<+R  .  SH :  PRrNTSPC(S> .  SM :  NEXTR 

710  R=0:C=0:GOTO260 

720  REM   EDIT  CHflRflCTER  FROM  TABLE 

730   J<=CS+8*CR  :  PRIHT"n"  ■  FORR=0TD?   V=PEEKi:;:+R>  :  FORC=0TO7  ^  Z=Ff  Ifl ■:•  fi ) 

740   0=46  :  V=V*2  ■  IFV:;255THENQ=S1  ■  V=V-25b 

750  POKEZ..  Q   ME;::TC ..  R  :  R=0  C=y  -  GOSUES 1 0   GUTO260 

760  REN   EflSIC   STATEMENTS    TO  DEFINE   CHflRRCTER 

770  ;:=CS+3*CR  PRIHT"*MilMfKiaBl" 

730   RRINTLN."REhD  K'    FOR    1-=!;   TO   >;+7  ^    REftD   V      POKE   K.  V :    NEiiT"  '  LN=LNtin 

790   PRINTLN.;  "DRTfl"  ..■  )i.:  ■  F0RI=;:T0:  :+7  '  PRIfiT"l|.  "    =-EEK(  l>:'  MEVJI  ■  PRINT 
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Table  2 


800   GOTO260 

810  PRIHT"a";SPCa3V'3lPTiriHS;B"    PRIMT 

820  PRINTSPCip  ■■-■":{+■  flliD    BOT" 
830   PRINTSPCCP >;":*-■  ERASE" 
840   PRIHTi;PC:.;p::';"*=a  UPDRTE" 
950  PRIHTSPC'rp;'.;";®"  EflSIC" 
860   PRINTSPC<P;:i  :"*■■  REVIEW" 
S70  PRIHTSPuCP)  :"3:5S  QUIT" 
880   RETIJRH 
REhDV. 

1M0  pnKE3^"fl79.2:7  FRINT"n  VIC   CHfiRflCTER   DEMO" 

lie  PRINT"  "!M     BV   UPlVID  riRLMBERG" 

120  REM    43064   V'lH   MORRGR 

l:-;0  REM   FRENOHT.    ChLIFORHIH 

14fl  V::=FEEK':  '=:f^'^-2  P0KE52-.  K  POKE^t;..  K  '  POKES 3  ,.  PEEKC55>  'ULR 

im  CS=25i£*PEEK(5£:J+PEEK<5n 

1 60  FORI  =CST0CS+5 1 1  ^  POKEI ..  PEEK ( I  +327eS-CS >  ■■  h lEXT 

170  REfln   X: IFX<GTHEH20y 

130  FORI=K   TO  K+7  RERIiJ:POKEI.-T   NEXT 

190  nriT017'-i 

^■00  FPIHT".TSl=rBr:riEFr-i"  :PRINT"HI  TKLHMD"  ■PRIMT"FC!RSTUVW"  :PRIHT";;YZ[\]  t- 

ilfi   PRINT"    7"+r:HPf'r34>  +  "«*N.<'-"    PPINT"<>*^-..-..'"PRIMT"012345e7"  :PRINT"t 

220   PPINT"«5"SPCai);  "aiJPTIOHSI"  :PRINT 

230   PRINTSPC:(U:>,;  "*   HORMflLB" 

240  PRINTSPCf:  1 1  ::■  :  "  H-    LOMERB" 

2'=;0  pRiNTSPC<  11  :?:":■>:;  greekb" 
260  PR  I NTSPC  a  1 ) ; "  :•»:■!  QU  i  tB" 

270   PRINT  ■  PR  I  NT  T-R I  NT 
230  CETR*-  IFRJ-=""THEH2S0 
2'50    IFfl|:="N"THENPuKE3eSbS'j£40 
300    I Ffl*= "  L  " THENP0KE36g69 .-  242 
310    I FR$= "  G " THENFOKESbStiy  -■  £55 

320    I FHf  = " Q " THEHP0KE3e369  ■  249  '  POKESS-.  PEEK. (St. ;■  +i  ■  END 
330  GOTO280 

340   DRTfl716S.24..24..36,.e9.-  Iy2..e5..  66..  0 
350   DfiTR7176.  124..  34.  34..60..  34..34,  124  ..0 
360   DRTfl7iS4..  126..  34.34.32..  32..  32,  112.0 
370   DflTfl?132..  24..  24..  36. 36..  102-.  S6-.  126..  0 
380   DflTR72O0 ,.  1 26  ■  34 ..  32 ..  56 ..  32 ..  34 ..  1 26  ,■  0 
390   DftTfl7208 .  1 26 .•  70 ,.  1 2 ..  24 ..  48 ..  38 ..  1 26  ,■  0 
400   DflTfl72 1 6 ..  1 02 ..  36  ■  36 ..  60 .-  36 ..  36 ..  1 02  ,•  0 
410   DRTfl7224.24.36,.66..  126..  66..  36,24..  0 
420   DflTH7232..  28..  S  ■  S-  S..  8..  8,.  2S,.  0 
430  DRTfl7240..  102..  36..  40.  48.  46..  36..  1O2,.0 
440   rifiTfl7248.24..24..6Li..3fc'..36..  102.-102..0 
450   riRTR7256-.  6S  ■  102..  30..  66..  €■€■.■  €•€■.•  66..  0 
460   riHTR7264.-66..  98,.  32..  74..  70..  66 .  60..  0 
470   riRTfl7272..126.0.36,.60..36..0..  126-.0 
4S0   DRTR72&0  .  24  ■  36  .  €■€■  .■  €■€. ..  66 ..  36 .•  24 ..  u 
490  DRTR7233  ■  126..  36..  36..  36  ■  36..  36..  Sii,  0 
500   DRTR729e.  124.34..34..  60..32..  32..  112..0 
510   IIHTR7304..  126. .98  .43.. 24 ..48.98,.  12€,.0 
520   nRTfl7312..  62..  42 .  8..  8..  3..  S.-  28..  0 
530   DfiTfl7320 ,  20 ..  42 .  8 ..  8  . 8  ■  8  .■  28 ..  0 
546   DflTfl732S ..  3 .-  23 ,.  42..  42 ,.  23 ..  8..  8..  0 
550   DflTfl7336..  102..  66..  36.24..  36..  66..  102..0 
560   DfiTfl7344..  42..  42,.  42. 28.  3,  S.  23..  O 
570   DfiTR7352 .  0.  24 ..  36. 66 .  6€ ,  36.  1 02.  0 
5S0  IifiTR73ee.  0,.  0   0  ■  0.  B.  0.0-'  0 
590   £lflTR7363  .  0  ■  O  .0.0.0 . 0 .  0  •  0 
500  DFlTfl7  3  76 ..  0 ,.  0 ..  0 . 0 ..  0 . 0 .  0 . 0 
610   DRTR-l 
RERDV. 
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The  Confusing  Quote 


Charles  Brannon 


J%  ^  you  type  in  a  program,  you 
^^m^  will  eventually  come  to  a 
place  where  inform;.[ion  is  in 
quotes.  This  tells  the  computer  to 
"take  this  exactly  as  shown,"  instead 
of  interpreting  it.  For  example,  the 
instruction  PRINT  "PRINT"  causes  the 
word  PRINT  to  be  displayed  on  the 
screen.  The  PRINT  in  quotes  is 
entirely  different  from  the  command 
PRINT.  What,  however,  do  you  do 
when  you're  typing  in  a  line  (ike: 

1 0  INPUT  "WHAT  IS  YOUR 
NAME";NS 

and  you  make  a  mistake  at  the 
beginning  of  the  line?  You  just 
cursor-left  to  the  error,  and  correct  it. 
Right?  Nope.  What  you  get  are  a 
bunch  of  reverse-field  vertical  lines. 
These  are  control  characters,  but  that 
explanation  doesn't  help  you  retype 
that  error. 

When  you  typed  that  first  quote 
you  entered  the  twilight  zone  of 
quote  mode,  which  is  both  one  of 
the  most  frustrating  and  most  useful 
features  of  the  VIC,  The  trick  is  that 
cursor  keys  are  not  only  for  use  in 
screen  editing,  but  can  also  be 
programmed.  When  the  VIC  comes 
to  one  of  those  reverse-field  vertical 
lines,  it  will  attempt  to  actually  move 
the  cursor  left  one  space.  This  can  be 
used  to  produce  animation.  When  a 
character  is  printed  on  the  screen, 
the  cursor  moves  to  the  right  one 
space,  just  like  on  a  typewriter.  If, 
however,  you  move  it  back  with  a 
programmed  cursor-left,  you  can 
replace  the  old  character  with  a  new 
one.  Try  this  line: 

1 0  FOR  I  =  1  TO  20:PRINT'  •]  "; 
:NEXTI 

Other  cursor  controls  can  be 
programmed  as  well.  The  most 
commonly-used  one  is  the  clear- 
screen  character.  This  is  at  the  start  of 


The  trick  is  that 
cursor  iceys  are 
not  only  for  use 
in  screen  editing, 
but  can  also  be 
programmed. 

most  programs,  and  it  appears  as  a 
reverse-field  heart.  Actually,  all 
control  characters  on  the  VIC  are  in 
reverse-field.  Cursor-down  (Q)  can 
be  used  to  skip  down  to  any  line 
quickly,  without  a  having  to  print  a 
blank  line.  Hence  the  line; 

1 0  PRINT:PRINT:PRINT:PRINT 

can  be  replaced  by 

10  PRINT  "QQQQ"; 

Used  in  conjunction  with  the  HOME 
character,  cursor  down  can  act  like  a 
"vertical  TAB  statement."  At  the  start 
of  your  program,  define  CDS  (or  any 
string,  really)  to  be  equal  to  HOME 
and  21  cursor-downs.  Now  can 
place  the  cursor  on  any  line  with 
PRINT  LEFTS  (CDS,L);  where  L  is  the 
screen  line,  from  zero  to  22.  Reverse 
field  on  and  off  are  also  easy  to  use; 
just  insert  the  appropriate  characters 
before  and  after  the  text  you  want 
highlighted.  The  color  control  keys 
are  used  similarly,  except  that  while 
reverse-field  is  cancelled  by  a 
carriage-return,  the  color  command 
remains  in  effect  until  changed.  Has 
your  display  ever  disappeared? 
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Don't  despair,  you  probably  changed 
the  text  color  to  white  (CONTROL2), 
and  if  the  background  was  white, 
everything  would  disappear.  Just 
type  CTRL  some  other  color  to  regain 
it,  or  reset  with  STOP/RESTORE. 

Okay,  now  you 're  usjng  control 
characters  to  do  amazing  things,  but 
you  may  be  experiencing  another 
problem  —  you  can't  make  the  VIC 
print  them.  The  problem  here  is  that 
you  are  not  in  quote  mocJe.  Here  is 
exactly  how  quote  mode  works: 

1.  If  you  type  an  odd  number  of 
quotes,  you  are  in  quote-mode 
—  all  cursor  controls  (except 
DELete)  will  show  up  for  better 
or  worse. 

2.  An  even  number  of  quotes,  two 
or  four,  or  none  at  all.  lets  you  be 
in  the  edit  mode,  where  you  can 
move  the  cursor  anywhere  and 
type. 

3.  A  special  way  to  get  ;nto  quote 
mode  is  by  the  INST  key.  When 
you  insert  a  gap  in  text,  you  are 
temporarily  in  quote  mode.  If 
you  type  any  control  key,  it  will 
be  printed.  This  is  useful  for 
placing  cursor  controls  inside  an 
already-typed  line. 

Finally,  if  you  ate  going  crazy 
trying  to  figure  out  what  :liose 
quotes  are  doing  to  your  line,  just 
type  SHIFTED  RETURN  to  escape  to 
the  next  line.  SHIFTED  RETURN  does 
not  act  (ike  an  ENTER  key.  Itjust 
moves  to  the  next  line,  and  cancels 
reverse  field  and  quote  mode.  You 
can  then  cursor  up  to  the  mangled 
line  and  fix  it. 

Remember,  one  of  tfie  VIC's 
strengths  is  its  ability  to  mfantpulate 
the  cursor,  colors,  and  even  select 
upper/lower  or  uppercase/graphics. 
Don't  neglect  this  feature.  And  you 
can  quote  me  on  that. 
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Animating 
Integer  BASIC 
Low-Resolution 
Graphics 

Leslie  M.  Gnmm 
Mt.  View,  CA 

Animated  low-resolution  graphics  can  add  a  lot  of 
pizazz  to  your  Basic  program.  It  takes  longer  to 
design  the  program,  and  requires  the  knowledge 
of  a  few  peeks  and  pokes,  but  is  not  really  too 
difficult  to  learn,  and  the  results  make  the  effort 
extremely  worthwhile. 

There  are  two  basic  techniques  involved.  The 
first  is  the  design  of  the  animated  figures.  This  is 
similar  to  what  is  done  in  designing  cartoon  figures. 
The  second  technique  involves  "Hipping  pages"  on 
the  computer  while  successively  drawing  each 
section  of  your  animated  figure  to  create  the 
illusion  of  movement.  Each  technique  will  be 
explained  here,  with  a  short  Integer  Basic  program 
using  the  technique  as  an  example. 

Designing  The  Figure 

Before  you  take  pencil  and  paper  in  hand  it  is  a 
good  idea  to  spend  some  time  observing  or  visual- 
izing the  object  you  wish  to  animate  in  the  various 
phases  of  its  motion.  For  the  program  example 
here,  the  figure  to  be  animated  was  a  girl,  who  was 
to  be  shown  walking  from  left  to  right  across  the 
screen.  Observation  of  people  walking  was  followed 
by  paper  and  pencil  sketches  of  the  various  stages 
of  the  walking  motion,  as  shown  in  fig.  1.  In  this 
example,  the  illusion  of  walking  can  be  created 
with  a  succssion  of  four  pictures.  A,  B,  C,  and  D,  as 
shown. 

Once  you  have  a  sketch  of  your  figure,  you'll 
need  some  graph  paper.  Quadrille-ruled  paper  is 
fine,  but  the  special  Apple  graphics  paper  available 
in  some  computer  outlets  is  more  accurate,  because 
the  "squares"  on  the  screen  are  really  rectangles, 
which  can  throw  off  the  proportions  of  your 
finished  figure. 

Each  phase  of  the  movement  of  the  figure 
should  be  drawn  on  its  own  rectangular  section  of 


the  graph  paper.  Each  rectangular  section  should 
be  the  same  size,  and  the  figure  should  be  centered 
in  exactly  the  same  position  in  each  rectangle.  (See 
fig.  2).  In  the  case  of  the  girl,  the  rectangle  had  to 
be  wide  enough  to  accomodate  the  figure,  whether 
the  leg  was  projected  forwards  or  backward.  An 
extra  space  was  also  allowed  on  either  side  of  the 
girl,  but  this  is  not  essential.  Each  rectangle  should 
be  numbered  as  shown  in  Fig,  2,  with  the  upper 
left-hand  corner  counted  as  0,0  (just  as  the  upper 
left  corner  of  the  graphics  screen  is  0,0). 

Now  you  are  ready  to  develop  the  subroutines 
that  will  draw  the  figure.  You  will  need  one  sub- 
routine for  each  phase  of  the  movement,  as  a 
minimum.  These  subroutines  should  be  assigned 
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low  line  numbers,  and  as  many  commands  as 
possible  should  be  crammed  into  each  line  in  order 
to  speed  up  the  drawing  time.  {The  larger  your 
picture  is,  the  more  critical  this  aspect  becomes.) 
Use  HLIN  and  VLIN  commands  wherever 
possible. 

Since  your  figure  is  going  to  be  moving  on  the 
screen,  your  subroutines  should  not  plot  specific 
points  (such  as  PLOT  12,21),  but  should  be  written 
instead  in  general  terms.  To  do  this  call  the  0,0 
square  of  each  rectangle  X,Y.  Then  write  your 
commands  in  terms  of  X  and  Y.  For  example,  the 
girl's  face  is  drawn  with  a  short  vertical  line  at 
column  4  in  the  picture.  The  specific  command  to 
draw  the  face  would  be  VLIN  1 ,2  at  4.  The  general 
command  is  VLIN  Y+  l.Y  +  2  at  X  +  4.  Ifx'and  Y 
are  set  to  zero  before  the  subroutine  is  called,  the 
face  will  be  drawn  from  Y  =  1  to  Y  =  2  at  X  =  4.  It 
can  be  moved  one  space  to  the  right  by  adding  one 
to  X  before  calling  the  subroutine. 

The  subroutines  that  draw  the  girl  in  this 
program  are  located  from  100  to  200.  Subroutine 
100  draws  the  upper  half  of  the  girl,  which  is  the 
same  in  each  picture.  Subroutine  120  draws  the 
lower  half  in  the  standing  position  (A).  130  draws 
the  lower  half  with  one  foot  stepping  forward  (B), 
140  is  mid-stride  (C),  and  150  finishes  the  sequence 
(D).  To  make  the  girl  "walk,"  the  main  program 
calls  100  (top  half)  followed  by  the  appropriate 
bottom  half,  going  from  A  to  D  over  and  over.  The 
value  for  X  is  incremented  by  one  before  each 
successive  step  is  drawn,  so  that  the  girl  moves 
across  the  screen  one  square  at  a  time.  To  prevent 
leaving  a  trail  behind  the  figure,  you  also  need  an 
erase  routine  (160  in  this  program)  to  remove  each 
figure  before  the  next  one  is  drawn. 

You  may  wish  to  stop  at  this  point  and  experi- 
ment with  making  your  figure  mcne  across  the 
screen  without  taking  advantage  of  the  page- 
flipping  technique  described  below.  This  will  give 
you  a  chance  to  add  additional  draw^ings  or  to 
eliminate  drawings  not  needed.  The  problem  you 
will  observe  is  that  it  is  distracting  to  see  the  figure 
blinking  on  and  off  as  it  is  erased  and  redrawn  in 
front  of  you.  For  a  very  small  figure  this  could  be 
tolerated,  but  as  pictures  get  larger  or  more  com- 
plicated the  blinking  causes  the  animation  to  lose 
its  appeal. 

The  remainder  of  this  article  describes  a 
technique  for  making  your  figure  move  smoothly 
across  the  screen  without  blinking  on  and  off.  One 
section  will  explain  how  to  "flip  pages"  to  prevent 
blinking.  Another  section  explains  how  to  reset 
LOMEM  in  your  Integer  Basic  program  in  order 
to  free  the  memory  needed  for  the  second  page  of 
graphics.  A  thiid  section  will  describe  the  subrou- 
tine that  is  used  to  transfer  the  contents  of  page 
one  to  page  two,  and  the  final  section  will  tell  you 
how  the  main  program  works. 


Flipping  Pages 

The  Apple  lias  two  blocks  of  memory  that  can  be 
used  for  low-resolution  graphics.  They  are  referred 
to  as  pages.  Page  one  is  the  one  you  normally  use 
when  you  enter  the  command  CiR.  Thi,s  page  is 
also  used  for  your  text  statements.  Gaining  access 
to  page  two  lequires  a  bit  of  trickery.  One  of  the 
tricks  is  to  prevent  this  page  from  being  used  to 
store  the  variables  in  your  Integer  program.  This  is 
performed  by  putting  the  statement  LOMEM: 
3072  as  the  first  line  of  the  program.  Unfortunately, 
you  can't  just  type  that  in.  (Try  it  and  see  for 
yourself!)  But  there  is  a  way  to  do  it,  which  is 
explained  below.  The  second  trick  is  to  put  a 
picture  on  page  two.  But  alas!  there  is  no  command 
to  draw  or  print  text  on  page  two.  It  can  be  done, 
however,  by  making  the  drawing  on  page  one,  in 
the  usual  way,  and  calling  a  special  subrc>utine  in 
the  Apple  Monitor  to  make  a  copy  of  page  one  on 
page  two.  This  is  also  explained  below. 

Setting  LOMEM: 

Theie  is  more  than  one  way  lo  accomplish  this 
task,  but  the  method  described  here  results  in  the 
simplest  program.  It  requires  doing  some  things  in 
the  Apple  Monitor,  but  each  step  will  be  carefully 
explained,  so  you  should  have  no  trouble.  You  may 
want  lo  .save  the  program  you  liave  type<l  so  far  (if 
any)  before  you  begin.  If  you  haven't  started  a 
program  yet,  this  will  be  your  first  line. 

Enter  the  following  as  the  first  line  of  your 
Integer  program:  0  PRINT  3072.  Now  type  CALL- 
151  to  get  into  the  Monitor.  (Fig.  3  shows  what  you 
will  see  as  we  go  along.)  You  should  sec  the  * 
prompt.  The  first  task  is  to  locate  the  macliine 
language  version  of  the  Basic  program  line  0  which 
you  just  typed  in.  This  is  done  by  looking  at  the 
numbers  stored  in  two  special  memory  locations  in 
the  Monitor  -  memory  locations  OOCA  and  OOCB 
(or  CA  and  CB  for  short.)  These  locations  are 
called  pointers,  and  contain  numbers  representing 
the  address  of  the  beginning  of  your  program. 
(Note:  The  letters  A,  B,  C,  D,  E,  and  F  are  numbers 
(10  through  15)  in  machine  language.  The  O's  in 
machine  language  are  all  zeros,  so  when  you  see 
"0"  in  this  part  of  the  article,  type  a  zero  on  your 
computer,  not  a  letlei'  0.) 

Type  CB  (return).  \ou  will  see  OOCUi-  ##. 
The  actual  number  represented  here  b)  ##  will 
depend  on  the  size  of  your  program  and  the 
amount  of  memory  in  your  computer.  In  Fig.  3  the 
number  is  90.  Now  type  CA  (return).  You  will  .see 
OOCA-##  (##  =  C3  in  fig.  3).  Fhe  two-digit 
numbers  you  just  found  are  the  two  fial\es  of  the 
four  digit  address  of  line  zero  of  your  Basic  pro- 
gram. The  first  half  of  the  four  digit  number  is  the 
one  you  foinid  at  CB,  and  the  second  half  is  the 
one  you  found  at  CA.  In  the  example  in  fig.  3,  the 
whole  four  digit  number  is  90C3.  By  typing  this 
nimiber  (using  the  actual  numbers  you  found  on 
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BACKED  BY  ON-GOING  APPLICATIONS  SUPPORT 


HOME  FINANCE  PAK  I:  Entire  Series  S49.95  ®  (D 

CHECK  REGISTER  ANB  BUDGET:  This  comprehEiisive  CHECKING  ACCOUNT 
MANAGEMENT  SYSTEM  not  only  keeps  camplele  records,  il  also  gives  you 
the  analysis  and  control  tools  you  need  lo  actively  manage  your  account 
The  system  provides  routines  for  BUDGETING  INCQME  AND  EXPENSE.  AUTO- 
MATIC CHECK  SEARCH,  and  BANK  STATEMENT  RECONCILING.  CRT  oi  printer 
reports  ate  produced  for  ACTUAL  EXPENSE  vs  BUDGET.  CHECK  SEARCH 
DISPLAY  RECONCILIATION  REPORT  and  CHECK  REGISTER  DISPLAY  by  month 
Check  entry  is  prompted  by  user-defined  menus  oi  standard  purposes  and 
recipient  codes,  speeding  data  entry  and  reducing  disk  storage  and 
retrieval  time.  Six  fields  of  data  are  stored  for  each  check:  amount,  check 
no.,  date,  purpose,  recipient  and  TAX  DEDUCTIBLE  REMINDER.  CHECK  SEARCH 
routines  allow  searching  on  any  of  these  data  fields.  Up  to  100  checks/mo. 
storage S39.95 

SAVINGS:  Account  management  system  lor  up  to  20  separate  Savings 
accounts.  Organizes,  files  and  displays  deposits,  withdrawals  and  interest 
earned  for  each  account $14,95 

CREDIT  CARD:  Gel  Control  of  youi  credit  cards  with  this  pi  ogram.  Organises, 
stores  and  displays  purchases,  payments  and  service  charges  loi  up  to  20 
separate  cards  or  bank  loans,    S14.95 

UNIVERSAL  COIVlPUTiNG  IVIACHtNE:  S49.95  ® 

A  user  programmable  computing  system  structured  around  a  50  row  x  50 
column  table.  User  defines  row  and  column  names  and  equations  forming  a 
unique  computing  machine  Table  elements  can  be  multiplied,  divided, 
subtracted  or  added  to  any  other  element.  Hundreds  ol  unique  computing 
machines  can  be  defined,  used,  stored,  and  recalled,  for  later  use  Excellent 
(or  sales  forecasts,  budgets,  inventory  lists,  income  statements,  production 
planning,  project  cost  estimates-in  short  for  any  planning,  analysis  or 
reporting  problem  that  can  by  solved  with  a  table. 

COLOR  CALENDAR:  529.95® 

Got  a  busy  calendar?  Organize  il  with  Color  Calendar,  Whether  its 
birthdays,  appointments,  business  meetings  or  a  regular  office  schedule, 
this  program  is  the  perfect  way  to  schedule  your  activities. 
The  calendar  display  is  a  beautiful  HI-BES  color  graphics  calendar  of  the 
selected  month  with  each  scheduled  day  highlighted  in  color.  Using  the 
daily  schedule,  you  can  review  any  day  of  the  month  and  schedule  anevent 
or  activity  in  any  one  of  20  time  slots  from  8:00  A,M  to  5:30  P  M, 

BUSINESS  SOFTWARE:         Entire  Series  SI 59.95®® 

MICROACCOUNTANT:  The  ideal  accounting  system  foi  small  businesses. 

Based  on  classic  T-accounts  and  double-entry  booking,  this  ellicienl 

program  provides  ajournai  for  recording  posting  and  reviewing  up  lo  1,000 

transactions  per  month  lo  any  one  of  300  accounts  The  program  produces 

CRT  and  printer  reports  covering: 

TRANSACTION   JOURNAL  BALANCE   SHEET 

ACCOUNT  LEDGERS  INCOME  AND   EXPENSE   STATEMENT 

Includes  a  short  primer  on  Financial  Accounling  (48K)    S49,95 

UNIVERSAL  BUSINESS  MACHINE:  This  program  is  designed  to  SIMPLIFY  and 
SAt/E  TIME  for  the  serious  businessman  who  must  periodically  Analyze. 
Plan  and  Estimate.  The  program  was  created  using  our  Universal  Computing 
Machine  and  il  is  programmed  to  provide  the  following  planning  and 
forecasting  tods, 

CASH   FLOW  ANALYSIS  SALES   FORECASTER 

PRDFORMA   PROFIT  «   LOSS  SOURCE  ANO    USE   DF   FUNDS 

PROFORMA   BALANCE  SHEET  JOB   COST   ESTIMATOR 

REAL   ESTATE   INVESTMENT  INVENTORY   ANALYSIS 

Price,  including  a  copy  of  the  Universal  Computing  Machine  ....  S89,95 

BUSINESS  CHECK  REGISTER  AND  BUDGET:  Our  Check  Register  and  Budget 
programs  expanded  to  mclude  up  to  50  budgetable  items  and  up  to  400 
Checks  per  month.  Includes  bank  statement  reconciling  and  automatic 
check  search  (48K)    S49,95 

ELECTRONICS  SERIES  VOL  I  &  II:  Entire  Series  $259.95 

LOGIC  SIMULATOR:  SAVE  TIME  ANO  MONEY.  Simulate  your  digital  logic 
circuits  belore  you  build  them.  CMOS.  TTL.  or  whatever,  if  it  s  digital  logic, 
this  program  can  handle  it  The  program  is  an  interactive,  menu  driven, 
lull-fledged  logic  simulator  capable  of  simulating  the  bit-lime  response  ol  a 
logic  network  lo  user-specified  input  patterns.  II  will  handle  up  to  1000 
gates,  including  NANDS.  NORS.  INVERTERS.  FLIP-FLOPS.  SHIFT  REGISTERS. 
COUNTERS  and  user-delined  MACROS,  up  to  40  user-defined  random,  or 
binary  input  patterns.  Accepts  network  descriptions  from  keyboard  oMrom 
LOGIC  DESIGNER  lor  simulation      S159,95    ®(l) 


LOGIC  DESIGNER:  Interactive  HI-RES  graphics  program  tor  designing  digital 
logic  systems.  Draw  directly  on  the  screen  up  to  10  different  gate  types, 
including  NAND.N0R.INVERTER.EX-0R.T-FLDP.JK-FL0P.D-FL0P.RS-FL0P.4BIT 
COUNTER  and  N-BIT  SHIFT  REGISTER.  User  interconnects  gales  using  line 
graphicscommands.  Network  descriptions  for  LOGIC  SIMULATOR  generated 
simultaneously  with  the  CRT  diagram  being  drawn S159,95(^ 

MANUAL  AND  DEMO  DISK:  Instruction  Manual  and  demo  disk  illustrating 
capabilities  of  both  program  (s)    S29  95  (fl)(f) 

ELECTRONIC  SERIES  VOL  III  &  IV:  Entire  Series  $259.95 

CIRCUIT  SIMULATOR:  Tired  ol  Irial  &  error  circuit  design'  Simulate  &  debug 
your  designs  belore  you  build  them'  With  CIRCUIT  SIMULATOR  you  build  a 
model  of  your  circuit  using  RESISTORS.  CAPACITORS.  INDUCTORS.  TRANSISTORS. 
DIODES.  VOLTAGE  and  CURRENT  SOURCES  and  simulate  the  waveform  response 
to  inputs  such  as  PULSES.  SINUSOIDS.  SAWTOOTHS.  etc  all  fully  programmable. 
The  output  is  displayed  as  an  OSCILLOSCOPE-STYLE  PLOT  of  the  selected 
waveforms  (Apple  only)  or  as  a  printed  table  ol  voltage  vs  time.  Handles  up  to 
200  notes  and  up  to  20  sources.  Requires  48  RAM 5159,95  :(fl)  0 

CIRCUIT  DESIGNER:  Interactive  HI-RES  graphics  program  lor  designing  electronic 
circuits  Draw  directly  on  the  screen  up  to  10  different  companenl  types, 
including  those  referenced  above.  Components  interconnect  list  lor  CIRCUIT 
SIMULATOR  generated  automatically.  Requires S15995 

MATHEMATICS  SERIES:  Entire  Series  S49.95 

STATISTICAL  ANALYSIS  I:  This  menu  driven  program  performs  LINEAR 
REGRESSION  analysis,  determines  the  mean,  standard  deviation  and  plots 
the  frequency  distribution  of  user-supplied  data  sets.  Printer.  Disk.  I/O 
routines    S19.95 

HUMERICALANALYSIS:  HI-RES2-Dimensional  plot  of  anyfunction.  Automatic 
scaling  At  your  option,  the  program  will  plot  the  function,  plot  the 
INTEGRAL  plot  the  DERIVATIVE,  determine  the  ROOTS.  MAXIMA.  MINIMA. 
INTEGRAL  VALUE    S19,95 

MATRIX:  A  general  purpose,  menu  driven  program  lor  determining  the 
INVERSE  and  DETERMINANT  ol  any  matrix,  as  well  as  the  SOLUTION  to  any  set 
of  SIMULTANEOUS  LINEAR  EOUATIDNS S19.95 

3-D  SURFACE  PLOTTER:  Explore  the  ELEGANCE  and  BEAUTY  of  MATHEMATICS 
by  creating  HI-RES  PLOTS  of  3-dimensional  surlaces  from  any  3-variable 
equation.  Disk  save  and  recall  routines  for  plots  lulenu  driven  to  vary 
surface  parameters,  Hidden  line  or  transparenl  plotting 319,95 

ACTION  ADVENTURE  GAMES:      Entire  Series  $29.95  ® 

RED  BARON:  Can  you  outliy  the  BED  BARON?  This  fast  action  game  simulates 
a  machine-gun  DOGFIGHT  between  your  WORLD  WAR  I  BI-PLANE  and  the 
barons.  You  can  LOOP.  DIVE.  BANK  or  CLIMB-and  so  can  the  BARDN.  In  HI-RES 
graphics  plus  sound, 314,95 

BATTLE  OF  MIDWAY:  You  are  in  command  of  the  U.S.S.  HORNETS'  DIVE- 
BOMBER  squadron.  Your  targets  are  the  Aircralt  carriers.  Akagi.  Soryu  and 
Kaga.  You  must  fly  your  way  through  ZEROS  and  AA  FIRE  to  make  your 
DIVE-BOMB  run.  In  Hl-RES  graphics  plus  sound S14,95 

SUB  ATTACK:  Its  April  1943,  The  enemy  convoy  is  headed  for  the  CONTROL 
SEA.  Your  sub,  the  MORAY,  has  just  sighted  the  CARRIERS  and  BATTLESHIPS' 
Easy  pickings  But  watch  out  for  the  DESTROYERS  -  they're  fast  and  deadly. 
In  HI-RES  graphics  plus  sound 514,95 

FREE  CATALOG-AM  programs  are  supplied  on  disk  and  runon  Apple  II  w/Disk 
&  Applesoit  RDM  Card  &  TRS-80  Level  II  and  require  32K  RAM  unless 
otherwise  noted.  Detailed  instructions  included.  Orders  shipped  within  5 
days.  Card  users  include  card  number.  Add  SI. 50  postage  and  handling 
witheachorder,  Calif  ornia  residents  add  6' :''iisafes  tax.  Foreign  orders  add 
35.00  postage  and  handling. 
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your  computer)  and  pressing  (return)  two  or  three 
times  you  will  see  a  series  of  nimibers  representing 
line  zero  of  your  Basic  program. 

The  first  eight  two-digit  numbers  vou  sliould 
see  are  the  following:  08  00  00  62  B3  00  OC  0 1 . 
The  number  "08"  means  there  are  eight  numbers 
for  line  zero;  the  numbers  "00  00"  mean  the  first 
line  is  line  zero;  the  "62"  means  PRINT;  "B3  00 
OC"  stands  for  3072  and  the  "01"  at  the  end  means 
"end  of  this  line."  By  replacing  the  number  62  with 
the  number  1 1  you  can  change  the  PRINT  in  line 
zero  to  LOMEN:. 


To  change  the  62  to  1  1.  just  tvpe  in  t  lie  address 
you  found  in  CB  and  CA  again  (00(;3  in  fig.  3.  but 
different  in  your  computer),  and  put  a  colon 
immediately  after  it  -  but  don't  press  return  just 
yet!  The  colon  tells  the  computer  that  y(ju  are 
going  to  enter  some  new  ninnbers  in  here.  Type 
the  follovving  four  numbers:  08  00  00  I  I ,  and  press 
return.  Type  control-C  to  get  back  inuj  Basic,  and 
list  line  zero.  It  will  now  read:  0  LOMEM:  3072. 

Copy  And  Flip  Subroutine 

The  workhorse  of  this  program  is  the  subroutine 
at  line  60.  It  does  the  job  of  copying  wh;ii  is  on 
graphics  page  one  to  page  two.  The  displav  on 
page  one  is  not  eiased  by  the  cnp)  ing.  and  will  slay 
there  until  your  program  changes  it.  Here's  how 
the  page-flipping  routine  works:  While  vour 
subroutines  ai'e  drawing  oi-  erasing  on  page  one, 
the  viewer  is  looking  at  a  finished  picture  on  page 
two.  When  the  drawing  on  page  one  is  complete, 
the  viewer  is  switched  to  page  one  where  he  sees 
the  next  step  in  the  movement  ol  the  figure.  He 
hasn't  seen  any  of  the  drawing  or  erasing,  so  it  only 
appears  that  the  figure  has  made  a  slighi  shift  in 
position.  While  tlie  viewer  is  looking  al  i)age  one. 
the  computer  is  busy  copying  page  one  lo  page  two 
—  invisibly.  The  subroutine  then  switches  to  page 
two,  biu  the  viewer  is  unaware  that  anvthintr  has 

1  1      -  ■  J  o 

happened  since  page  two  is  now  an  exaci  copy  of 
[jageone.  Now,  while  the  viewer  is  looking  at  page 
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Analyze  disc  drive  motor  speed  on  a  routine  basii  with 
ar  adjustattle  real-time  speedometer.  Accurate  to  one- 
tenth  of  oner.  p.m.  outof  300r.p.m. 
Fine-tune  disc  drive  motor  speed  yourself.  All  ycu  need 
is  DDT,  two  screwdrivers,  and  five  minules' time. 


$29^ 
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Diskette  &  compS^if  manual 
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Also  available  for  TRS-80  Model  I. 
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two,  the  cycle  repeats  and  a  new  drawing  is  begun 
"behind  the  scenes"  on  page  one. 

The  POKE- 16300,0  at  the  beginning  of 
subroutine  60  causes  page  one  to  be  displayed, 
showing  the  viewer  the  drawing  you  made  while  he 
was  looking  al  page  two.  The  next  six  pokes  specify 
that  it  is  page  one  of  graphics  that  is  to  be  copied  to 
page  two.  The  CALL-468  does  the  actual  copying. 
The  last  Poke,  POKE- 1 6299,0  causes  page  two  to 
be  displayed  again,  and  the  subroutine  returns  to 
the  main  program  so  that  the  next  step  in  the 
drawing  can  i>e  made  out  of  sight  on  page  one. 

The  speed  of  the  animation  can  be  slowed 
down  if  necessary  with  delay  loops  such  as  those  in 
lines  50,  5 1 ,  and  52.  For  large  or  very  complicated 
drawings  delay  loops  won't  be  necessary,  but  lor  a 
small  object  wiiich  is  t[uickly  drawn  you  may  want 
them. 

Main  Program 

The  main  program  is  found  from  line  1000  to 
2000.  You  can  see  that  it  consists  mostly  of 
GOSUB's.  There  is  a  FOR...NEX'r  loop,  and 
several  X  =  X+  1  commands,  which  cause  the 
Figure  to  move  to  the  right.  Line  1000  clears  the 
graphics  and  text  display  and  calls  the  page-flip 
routine  so  that  the  viewer  will  be  looking  at  a  blank 
screen  for  a  few  microseconds  while  llie  hrst 
drawing  is  made.  Lines  1010  and  1020  draw  a 
sidewalk  and  place  the  girl  on  the  sidewalk  at  the 
left  of  the  screen,  standing  still  (drawing  A).  Note 
that  X  was  set  to  zero  to  place  her  at  tlic  left  edge, 
and  Y  was  set  to  10  U)  put  her  down  on  the  sidewalk. 
At  the  end  of  line  1020  the  page  Hip  subroutine  is 
called,  followed  by  a  delay  subroutine,  so  that  the 
viewer  looks  at  the  standing  girl  for  a  brief  time 
before  she  begins  to  walk.  Lines  \0'M)  through 
1050  contain  a  FOR...NEX'I'  loop  dining  which 
the  drawings  B,  C,  D,  A  will  be  made  seven  times. 
(The  loop  starts  at  B  since  A  was  made  before 
entering  the  loop,  and  it  was  desirable  to  finish 
with  the  gill  in  standing  positi(Mi).  Note  that  the 
first  GOSUB  in  line  HBO  erases  the  girl  X  is  then 
incremented  by  one  before  the  next  drawing  is 
made,  so  that  she  will  appear  to  have  shifted  one 
space  to  the  right.  Each  time  a  new  drawing  is 
made  it  must  Ix-  era.sed  before  incrementing  X  and 
making  the  next  drawing,  or  the  figure  will  leave  a 
trail  of  itself  behind  on  the  screen.  In  this  example 
program  the  girl  will  move  across  tlie  screen  from 
left  to  right  one  scjuare  al  a  time.  The  last  step  of 
the  program  is  to  do  a  POKE- 1 6300,0  at  the  end, 
so  thai  tlie  viewer  will  be  left  on  page  one  when  the 
program  ends. 

Final  Hints 

When  von  are  debugging  your  program  and  using 
the  pagr-(li[>ping  subroutine,  you  mav  occasionally 
hear  the  ominous  "syntax  error"  l)cep,  but  be 
unable  to  sec  a  message  on  the  screen,  and  also  see 
no  cursor.  Tins  probably  means  you  have  been 


caught  on  page  two,  and  the  error  message  that 
stopped  your  program  and  left  you  stranded  on 
page  two  is  being  displayed  on  page  one.  Just  type 
POKE- 16300,0  (return),  and  you  will  see  page  one 
displayed,  where  the  error  message  and  cursor  will 
be  visible. 

It  is  hoped  that  you  have  a  lot  of  fun  with 
animating  your  graphics  routines,  despite  the  extra 
effort  involved.  The  same  general  methods  apply 
to  Applesoft  programs,  but  different  "tricks"  are 
required  io  gain  access  to  page  two  and  to  do  the 
memory  move  recjuired.  These  "tricks"  will  be 
described  in  a  future  article. 


.>LIST 

0  L0HEH:3e72 
10  POKE  -16300,0:  TEXT  :  CALL 
-936:  GR  :  GOTO  100© 

49  REM  **  DELAY  ROUTINES  ** 

50  FOR  J=l  TO  50:  NEXT  J:  RETURN 

51  FOR  J=l  TO  1000:  NEXT  J:  RETURN 

52  FOR  J=l  TO  2000:  NEXT  J:  RETURN 

59  REM  **  PflOE  FLIPPER  ** 
SO  POKE  -1G300,0:  POKE  G0,0:  POKE 
61,4:  POKE  62,255:  POKE  63, 
7:  POKE  G6>0:  POKE  67,8:  COLL 
-468:  POKE  -16233,0:  RETURN 

38  REM  **  GRfiPHICS  FOR  6IRL  ** 
99  REM  **  ORRN  TOP  HALF  ** 
.100  C0L0R=8:  HLIN  X+3,X+4  RT  V: 
ULIN  V,V+2  FIT  X+3:  PLOT  X+ 
2,V+2 
tfi!=l  C0L0R=13:  ULIN  V+l,V+2  RT  X+ 
4:  C0L0R=6:  ULIN  V+3,V+6  OT 
X+3:  ULIN  V+3,V+e  RT  X+4 
110  C0L0R=3:  ULIN  V+7,V+8  RT  X+ 
3:  ULIN  V+7,V+8  RT  X+4:  HLIN 
"  X+2,X+5  RT  Y+9:  RETURN 
1 13  REM  **  STRNDING  LEGS  ** 
120  C0L0R=13:  ULIN  V+10,V+11  RT 
v+3:  C0L0R=8:  HLIN  X+3, X+4  RT 
V+12:  RETURN 
li'9  REM  **  STEP  FORWARD  ** 
130  C0L0R=13:  ULIN  V+10,V+11  RT 
X+3:  PLOT  X+4,V+10:  PLOT  X+ 
5,V+11:  C0L0R=8:  HLIN  X+3,X+ 
4  RT  V+12:  PLOT  X+6,V+12:  PLOT 
X+7,V+11:  RETURN 
133  REM  **  MIDDLE  OF  STEP  ** 
140  C0L0R=13:  HLIN  X+3, X+4  RT  V+ 
10:  PLOT  X+2,V+11:  PLOT  X+5 
,V+11:  C0L0R=8:  HLIN  X+2,X+ 
3  RT  V+12:  HLIN  X+5,X+6  RT 
V+12:  RETURN 

149  REM  **  END  OF  STEP  ** 

150  C0L0R=13:  ULIN  V+10,V+11  RT 
K+4:  PLOT  X+3,V+10:  PLOT  X+ 
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2.V+U:    C0L0R=8:    ULIN  V+11, 
V+12  AT  X+1:    HLIN  X+4,X+5  RT 
V+12:    RETURN 

159  REM     **  ERfiSE  GIRL  ** 

160  COLOR=0:    FOR  J=X+1   TO  X+7:    ULIN 
VA'+12  fiT  J:    NEXT  J:    RETLfRN 

S39  REM     **   HflIN  ROUTINE  ** 
1800  GR   :    CALL   -936:    GOSUB  68:    TfiB 

14:  PRINT  "GIRL  WRLKING" 
1010  C0L0R=5:  HLIN  8,39  AT  23 
1020  K=0:V=10:    GOSUB   188:    GOSUB 

120:    GOSUB  60:    GOSUB  51 
1030  FOR   1=1   TO  7:    GOSUB  160:X=X+ 

1:    GOSUB   100:    GOSUB   138:    GOSUB 

60:    GOSUB  50 
1040  GOSUB   160:X=X+1:    GOSUB   100: 
GOSUB   140:    GOSUB  68:    GOSUB 

58:    GOSUB   160:X=X+1:    GOSUB 

100:    GOSUB   150:    GOSUB  68:    GOSUB 

50 
l£i58  SGSUB   iee:X=X+l:    GOSUB   188; 
GOSUB   120:    GOSUB  68:    GOSUB 

50:    NEXT   I 
1OS0  CfiLL  -936:    TfiB   17:    PRINT   "THE  EN 

0":    POKE   -16300,0:    GOSUB  52 

:    GOSUB   160;    C0L0R=8:    HLIN 

0,39  AT  23 
2090  TEXT   :    CALL   -936:    POKE  -16308 

,0:    END  © 


SOFTWARE  HOLDUP  ? 


Pholo  Dimmicks  Doubles 


TIRED  OF  HIGH  PRICES  &  NO  SERVICE  ? 

Quaiity  Software 
Apple  II  -  TRS-80  -  Tl  99/4  -  Apple  III 

Creative  Discount  Software 

256  South  Robertson,  Suite  2156 

Beverly  Hills,  CA  90211 


CALL  for  our  Catalog  TOLL  FREE 
Operator  831 


B00-B24-7888 

Alaska/Hawaii  800-824-7919 
Calilornia  B00-85Z.7777 


IM  N|  IS  I    II  S       I    I   Vjl   I    I  IS  I 


Sabotage  .... 
HI-RES  Soccer 


PROGRAMS  LISTED  BELOW  ARE  ON  DK  K 

■■•■■- ^ S24  (S 


Pulsarll      i...  

Oitilron    :. ][ 

Autobahn  

Gamma  Goblins 

EPy X  ( AuIOmalmJ  Simulations)  SPECIAL  — 
While  they  last.  R/n/Morloc/Rigel  all  three. 

Galaxy  Wars 

Superscribe   ','.'.'.'.'.'. 

Galactic  Empire 

Galactic  Trader  . . . : 

Galactic  Revolution 

DB  Master   

Arislolle's  Apple ,v,-  »,  - 

Micro  Mem6    jvV»ii*     


S24  te  Km  tll.l* 

S29  )5  nnr  •as.a* 

S29  IS  nc  tas-a* 

$29  IS  .HI.  (aa-afl 

$29  IS  «<m  tas-at 

$29  IS  rm  tas.9« 


^;^^ 


The  Data  Factory jK^T 

Mission  Asteroid  ...  ^tf^wr 
Galactic  Atlacfc  . . 
Wizardry  ...  ^' 

Bright  Pen 

Slar  Mines   

PFS  (Personal  Filing  System)  ....'.'.'.'. 

PFS:  Report ...... 

Warp  Factor  

Vinyl  holders  tor  20  disks  in 

beautiful  deluxe  padded  binder . 

DOSToolKit  

Microsoft  Adventure  _ 

Olympic  Decathlon   ; 

Compu-Malh  Anthmetic  '. 

CRAE2.0  

MCAT2.0 : .;■;  ;■" 

Cartels  and  Cutlhro^  

Operation  Apocalypse  

Torpedo  Fire 

Tank  Attack 

Modifiable  Database  II  

TG  Game  Paddles 

TG  Joy  Slick 

The  Tarturian 

The  Prisoner 

The  Wizard  &  The  Princess 

Flight  Simulator  (disk) 

Star  Cruiser 

Space  Album  

Odyssey  •. 

Micro  League  Baseball ^. . .  ^ 

Sargon  II J;.. 

Program  Line  Editor 

Space  Eggs  

Mystery  House  in  French  ..,.'. 

2-BO  Sottcard 

Videx80-Col,  Board 

3D  Super  Graphics  _  _ 

Compu-Math  I  or  II 

HI-RES  Cribbage L.- ;..;:: 

Phantom  Five .[,;..   .. . 

Star  Gaiers  Guide 

Lords  ol  Karma     

Apple  PIE  &  Formatter  (Reg  $129  95) 

The  Book  of  Software 

Versa  Writer  Expansion  Pae-I  i . . . : 

The  Linguist  .  i 

Apple  II  Users  Guide 

Oh  Shoot! 

Serendipity  Statistics  or  Gradebook 

Bridge (*anner (disk) I _,,,. 

ABM  (Muse)     | [    ..       .. 

Data Ploi(Muse)    . .! l .     ,   . ,. 

Computer  Conflict  . .! '  .  ,  . 

Computer  Air  Combat ; , . . .     ,v 

The  Temple  of  Apsha  . .    jjcft- 

Super-Text  U  .?:...  _„.*'*i* 

Magic  Window; ; :  jPL^ 

Request  ,   1    ft^JT 

Space  Raiders  :         ■' 
Thinker  ^ 

Super  Kram        "     

Savage  Island  I  (diskj  .   _   . . .  i  . . 
Savage  Island  II  (disk)     ...     ! .   . 

Thrilogy  

Zork 

Howardsoft  Real  Estate  Analyzer . 

Super  Disk  Copy-Sensible 

Fastgammon 

Astro  Apple      

Akalabeth  


i ta«.«t 

$24.  IS  nm,  tia.99 

.$129  IS  KM  tii«.a* 

S24.  IS  rww  tai.a* 

.  .  .$24  IS  new  fii.a* 

$24^5  <iD.  tai.at 

$229  60  no.  (I*«.S« 

.   $34  ^  now  (a«.M 

-$39  9S<w»  fas.w 

.$15000  now  tlH." 
$19.*' 

.  $29.; , „ 

$39  95  no.  f aa.w 

.  .$49.95  now  $4a.4* 

$29  95  now  tas.3« 

.$95(On<m  $H.W 

$95(0  AM  tM4« 

.  .$39)  5  no-  $3a.M 


.  .$7S.*   nw 
.S29.i!  new 

.$24:$  »» 

.S49.9iiKiw 

$24.95  nw 


.Siso.bo™«r  $iaT.49 
.  .$39.95  now     taa.M 


$24.tS<iow 

S29.!S>K» 
.  .S32.<  S  now 

$34.'  5  now 
.$24<5now 

$39  <  5  now 
-S29.S5now 


.$34 

.$350  00™ 
.  $39  S^  no 
$40  ob  no 
,  $24  95  no 
,  $29  *  no, 
..SX.dpno, 


5  now  f  33.M 
5  no.  SSC.M 
5  now  $31.«« 
5  now  $a«.9« 
tlB-M 

5  riow    f  a».s« 

B  now       f  aO.M 
5  now       t3«.S« 

i  now  $as.M 
$ai.9« 
«a».T« 

t34.M 

$as.a« 

f  aa.M 

now  $a»«.M 

$S««.M 

»3S.f« 

t3«ea 

»ai. 
. — '    ias^« 
no.    $as.i« 

Special  ••«.•• 
fIT.W 

tas.M 
>w    fia.«« 

i  now  $ia.«« 
$19.9* 

' —  $i«a.S9 
«ai,i« 
$aa.«« 

tsa.9« 
I     tas.99 

<  now     $sa.99 
'  now    taa.** 

now   $ia«.99 

now    tas.M 


,  .S169  0)nor-  *•--  — 
S21  9  i  mr 

1  $24  9  i  no 
$59  91  no 
$39  9  i  no 

$59  9  i  now  $sa.99 

$39  9  i  now  taa.** 

$150  0) now  $iaa.99 

$99  9  >  now  taS.M 

$225  00  no-  $191.19 

$29  9^  now  *a9.a9 

5495  Op  no-  «4a*.M 


$175  0  I  now 

$20  95  no- 

.   $20  9^  now 

$24  9 , no- 

$39  95  now 

$160  0)  now 

$30  0)  now 

$24  9  i  no- 

. .  $20.0  I  now 

...$34  9iiw- 


«1M.*9 
tfr.T9 
$1T.T9 

«ai.i« 

saa.«« 

$ii«.«« 

$1S.«9 

*3t.a* 

♦19.99 
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Oscilloscope 


Rob  Smythe 
Ontario,  Canada 


Here  is  a  program  for  physics  teachers  that  makes 
good  use  of  the  Apple's  high  resolulion  graphics. 
Unless  your  school's  equipment  is  belter  than 
mine,  you  probably  find  it  tricky  to  demonstrate 
waveforms  in  class.  Stabilizing  the  pattern  on  an 
oscilloscope  can  require  painstaking  adjustment 
when  the  frequency  of  the  inputted  sound  is 
changed.  You  wish  to  show  how  the  shape  of  the 
wave  is  altered  as  overtones  are  added,  but  text- 
books don't  show  enough.  Demonstrating  the 
effect  of  different  separations  in  the  frequencies  of 
two  notes  requires  diagrams,  tedious  to  produce. 

With  this  program  you  can  show  effects  of 
varying  amplitude  and  frequency  on  sine  waves, 
add  up  to  five  overtones  (each  with  their  own 
amplitude)  and  show  the  resultant  wave  pattern 
for  up  lo  six  different  notes.  This  last  facility  is 
useful  for  demonstrating  the  cause  of  beats. 

When  you  run  this  Applesoft  program  you 
will  be  presented  with  a  table  showing  that  there 
are  no  notes  presently  in  memory  and  a  menu 
prompting  you  for  single  Keystroke  selection  of 
commands.  Touch  1,  2,  3,  4,  5  or  6  and  you  will  be 
able  to  set  the  amplitude  and  frequency  of  a  note. 
Enter  as  many  notes  as  you  wish,  or  change  them 
one  by  one.  Touch  P  to  plot  the  resultant  waveform. 
After  the  oscilloscope  pattern  is  drawn  and  you 
have  finished  studying  it,  return  to  the  menu  by 
pressing  any  key. 

Touching  S  will  enable  you  to  alter  the  plotting 
speed,  which  is  initially  set  at  4,  This  determines 
the  increment  along  the  x-axis  (lime  axis)  between 
plotted  points.  When  using  frequencies  over  about 
500  Hz,  you  might  have  to  set  speed  at  1  or  2 
(because  at  coarser  settings  significant  change  to 
the  shape  might  occur  between  points  and  be 
missed:  try  800  Hz  at  speed  4  and  speed  1  to  see 
this). 

To  clear  all  notes  from  the  table,  touch  C  and 
confirm  with  a  Y. 

Try  notes  of  amplitude  10  to  20  in  a  frequency 
range  of  100  to  500.  Create  a  complicated  note 
using  all  overtones,  with  amplitudes  10  or  less  (so 
that  you  don't  go  off  the  top  of  the  "scope").  Beat 
patterns  look  nice  when  you  play  notes  of  frequency 
1000  and  1050  together. 


The  Program: 

lOOO's  printtableand  menu  routine 

1030  format  numbers  in  display 

1100  wait  for  single  keystroke  input 

1110  input  data 

1 1 20  on  process  data  and  reject  invalid  input 

2000's  plot  routine 

2000-2110  draw  axes 

2150-2160  pickX  value  in  radians 

2170  sum  the  waves 

2190  scale  X  and  Y  to  fit  screen 

2200  check  for  off  scale  values 

2210  plot 

3000's  subroutine  to  check  that  points  are  not 

off  scale 
Variables  (in  order  of  appearance) 

G$  bell 

SP  speed  (1  =  slow  to  5  =  fast) 

I  counter,  local  pointer 

A$  local  input  variable 

AMP(l)  amplitude  ofthel-th  note 

FR(1)  frequency  ofthel-th  note  careful:  don't 

useFRE(I) 

F(l)  frequency  after  scaling  for  plotting 

TIME  a  measure  of  length  of  X-axis 

S  scaling  factor 

J  loop  counter 

X  horizontal  coordinate  of  point 

Y  vertical  coordinate  of  point 

Suggested  Modifications: 

1.  Very  small  changes  are  required  to  allow  for 
more  overtones. 

2.  Changing  TIME  in  line  2120  will  allow  for  a 
different  range  of  suitable  frequencies.  You  might 
add  TIME  input  lo  the  menu,  so  that  beats  can  be 
shown  effectively  with  frequencies  that  are  very 
close  together. 

3.  Of  course,  adding  routines  which  would  produce 
the  sound  of  the  note  you  have  created  on  the 
Apple's  speaker  would  make  this  program  tre- 
mendously useful.  Any  volunteers? 

]LIST 

10     REM       OSCILLOSCOPE 
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20  REM 


124::   UTAB  21 ;  CALL 


PRINT 


COPYRIGHT  (C)  1931 
BY  SOFTWARE  UKLIhlTED 


50  G$  =  CHRS  (7):  REM  ERROR  BEEP 


ICC 

997 
993 
999 

ICIC 

1C20 

1C3C 

ICIC 
105G 
ICiO 

1070 
108C 

1C9C 

1  IOC 

1110 

1120 
1130 


SP  =   4:   REf^     PLOTTING   SPEED 
FRCH   1  (SLCU=f1DST  ACCURATE) 
TO  5 

t 

REM     DATA   INPUT 


HCflE 


AMP        r 
PRINT     TA3( 


f     3TR$ 
IC   THEN 


TEXT 

PRINT  "    NOTE 
REG":  PRINT 

FOR  I  =  1  TG  6: 
7)?  If''      '■? 
A$  =  RIGHTi  C 
(FR'>  I))y6):  IF  AHPJI) 

PRINT  '■  "i 

PRINT  AMP(I)r   "fAS 

PRINT  :  NEXT  I 

PRINT  :  PRINT  ;  PRINT  "SFEE 
D  -  "fSP 

UTAH  21 

PRINT  "CHANGE  NGTEt  1/2/3/4 

/5/6   plot:  P" 
print  "clear  n'gtes:  c 
t:  e  speed:  s" 

POKE  -  16363 rC:  UAIT 
334^123 

GET  A$:i  =  VAL  (Ai):  IF  I  > 
6   THEN  PRINT  Qtt   GOTO  lOCO 

IF  I  =  C  THEN  1180 

VTAB  21 :  CALL  -  958 t  PRINT 

"NOTE  ";if":  '■;:  input  -ahpl 

ITUDE  (1-10)  "JAitAHPd)  =     UAL 
(At);    IF   AhPd)  =   0   THEN   113 
0 
iUO      IF   AHP(  I)  >   20  THEN     PRINT 
Gt;:    GOTO   1130 

PRINT     TAB(    9)rt    INPUT   "FRE 
QUENCY  -    SFR(I):    IF  FRa  )  < 
C  CR  FR(  I )  >   99979   THEN     PRINT 
G$7t    'v'TAB  22 1   CALL     -   8631   GOTO 
1150 
F(I)   =  FR(I) 


EXI 

-   16 


■1 1  tin 

J.  4  jO 


■I    17," 

use 

119C 

12CC 


,1.  £.iV 


Ulj   i    U       1  \>  '»/  0 


Ai  =  "E" 
A-i  =  "P" 
At  =    "C" 


THEN 
THEN 

THEN 


Er^D 
20CC 

1240 


THEN     PRINT 


123C 


IF 

IF 

IF 

IF   A1  <     >   "5 
G-9:    GCTO    ICOC 

'v'TAB  21 :   CALL     -  953:   INPUT 
"ENTER  SPEED   (1-5)   -   "5SP:    IF 
SP   <    1   CR  3P   >  5   CR      INT   ( 3P 
)  <     >  SP  THEN     PRINT  G$:    GOTO 
1220 

GCTC  iCCC 


"CLEAR  ALL  NOTES  IN  MEfiORY? 
(  Y/N  )  " :  GET  Al :  IF  A$  <  ';■ 
"Y"  THEN  lOOC 

FOR  I  =  1  TO  6:f(I)  =  c;fr( 

T)  =   CtAMPd)  =  O:    NEXT    :   GOTO 


1997 
199S 
1999 
2CC0 
2C10 
2C2C 
2030 

'  ■■  P  £  ■"'■ 

^  .  V  -T  V 
*■..  V  brf  V 

al  V  a  ^i^ 

A-.  V  /     Vj 

2CSC 
2C90 
21CC 

2  lie 

2120 
2130 
2U0 
2150 
2160 
217 


RCM 


PLOTTING  ROUTINE 


KOHE 
VTAB  24 
HGR 

HCCLCR=    3 

HPLGT  0.30   TO  279^80 
HPLGT  0j16  TC  0.143 
FOR    I  =    0  TC   279   STEP   7C 
HPLQT  1,78  TC   I? 82:   HPLGT   2 
75f7a  TC   279  J  32 
NEXT   I 

FOR    I  =    16  TO   144   STEP   16 
HPLCT  O/I  TG  4tI 
NEXT   I 


2190 
2190 
22C0 
2210 
2220 
2230 

2240 

2250 
2997 
2993 

2999 

3000 
3C1C 

:^C20 

3030 


TIftE   =  400 

■3  ^   23C   /  TIHE 

HPLCT  C;9C 

FOR    I  =   0  TO   TIME   STEP   SP 
X  =    I   *   3.14159  /   IBC 

Y  =  c:  FOR  J  =  1  TC  a:y  =  AM 

F(J)   /  5   *     SIN  (F(J)  *  X)  + 
Y:   NEXT  J 

Y  =  30  -  Y  *    16 
X  =    I  #  S 

GCSUB  3000 
HPLCT     TO  XjY 
NEXT  I 

POKE     -    16368 rO:    UAIT     -  16 
334  J 120 
GET   Al 
GCTO   1000 

* 

RE,^     SUBROUTINE  CHECK  RANGE 


IF 

IF 
IF 

IF 


C  THEN  X 
279  THEN 
0  THEN  Y 
159  THEN 


=   C 


279 


=   0 


159 


3C40      RETURN 


Apple  Authors 

COMPUTE!  is  looking  for  applica- 
tions articles  aimed  at  beginners 
and  intermediate  programmers. 
We're  specifically  interested  in 
programming  hints,  tutorials,  ar- 
ticles written  to  hielp  users  get 
more  out  of  their  machine. 


16K  RAM  EXPANSION  BOARD 
FOR  THE  APPLE  II*  $195.00 


The  Andromeda  I6K  RAM  Expansion  Board 
allows  your  Apple  to  use  RAM  memory  in  place 
of  the  BASIC  Language  ROMs  giving  you  up 
to  64K  of  programmable  memory.  Separate 
Applesoft*  or  Integer  BASIC  ROM  cards  are  no 
longer  needed.  The  16K  RAM  Expansion  Board 
works  with  the  Microsoft  Z-80  card,  Visicalc, 
DOS  3-3,  Pascal,  Fortran,  Pilot,  and  other 
software.  A  switch  on  the  card  selects  either 
the  RAM  language  or  the  mainboard  ROMs 
when  you  reset  your  Apple. 

The  Andromeda  16K  RAM  Expansion 
Board  has  a  proven  record  for  reliability  with 
thousands  of  satisfied  customers. 


Now  with  One  Year  Warranty. 

•Apple  II  and  Applesoft  are  trademarks. 

ANDnOMCDA 


INCORPORATED 

P.O.  Box  19144 
Greensboro,  NC.  27410 
919  852-1482 


Distributed  By: 


COMPUTER 

DATA 

SERVICES 


P.O.  Box  696 
Amherst,  NH.  03031 
603  673-7375 
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The  Apple 
Hi-Res  Shape 
Writer 

Doug  Hennig 
Dallas,  TX 

These  days  a  lot  of  people  are  writing  their  own 
games  or  applications  software  rather  than  paying 
f(jr  someone  else's  labor.  After  all,  designing  and 
writing  software  really  is  the  best  pari  abota  owning 
your  (jwn  microcomputer.  Games  especially  are 
fun  to  design  because  they  tax  not  only  your 
programming  skills,  but  your  imagination  as  well. 
Many  of  today's  popular  computer  games  are 
of  the  "arcade"  type  where  you  are  required  to  fire 
missies  to  destroy  any  number  of  different  kinds  of 
objects.  Usually  these  objects  are  drawn  and 
manipulated  on  the  high  resolution  screen  using 
hi-res  shape  tables  that  are  stored  in  memory  to 
define  the  object.  Other  types  of  games  also  use  hi- 
res shape  tables,  including  a  numljcr  of  recently 
developed  high  resolution  adventine  games.  As 
you  have  no  doubt  already  observed,  the  uses  of 
shape  tables  in  graphics  programs  is  almost  limitless. 
However,  that  is  where  the  problem  arises. 

Anyone  who  has  ever  designed  a  high  resolu- 
tion shape  table  knows  that  it  is  not  a  lot  of  fun  to 
do.  You  must  draw  the  shape  dot  by  dot,  convert 
each  dot  into  a  number,  convert  the  ntmibers  into 
bytes  by  an  obscure  process,  type  in  the  long  list  of 
bytes,  and  hope  llial  you  have  not  made  an  (^nor 
.somewhere  along  the  way  (I  invariably  do!).  After 
.several  attempts  at  such  nonsense,  1  thought  that 
there  must  be  an  easier  way.  Why  not  do  just  the 
fun  part  -  drawing  the  shape  -  and  leave  the 
Apple  to  do  the  hard  part?  Thus  the  Apple  Hi-Rcs 
Shape  Writer  was  born. 

The  Apple  Hi-Res  Shape  Writer  allows  you  to 
draw  any  shape  on  the  low  resolution  screen  using 
the  game  paddles  and  then  convert  the  lo-res 
shape  into  a  high  resolution  shape  table.  You  will 
.soon  see  your  graphics  ideas  take  shape  (no  pun 
intended)  cjuickly  and  painlessly.  Create  space 
ships,  alien  cieatures,  even  new  and  exotic  character 
sets. 

Operation 

Operation  of  the  Apple  Hi-Res  Shape  Writer  is 
simple.  First  you  tell  the  program  how  many 
shapes  you  want  in  the  shape  table  (the  maximum 
is  ten).  It  will  then  draw  a  dark  blue  backgroinid  in 
low  resolution  graphics  and  ask  you  for  the  number 
of  vertical  and  horizontal  elements  in  the  shape 
that  is  t<}  be  drawn  next;  since  the  kjw  resolution 


screen  is  40x40,  these  are  the  limits  for  the  shape. 
A  black  area  that  is  the  size  of  your  shape  will 
appear,  which  can  be  filled  in  as  you  wish.  The 
location  of  the  current  plotdng  position,  indicated 
by  a  flashing  light  blue  "cur.sor,"  is  controlled  by 
the  game  paddles.  To  plot  a  point,  press  "P"  and  to 
erase  a  previously  plotted  point,  press  "i;"  (note 
that  the  REPT  key  can  be  used  along  wilh  either  of 
these  to  give  "speed"  drawing).  The  shajje  docs  not 
have  to  be  drawn  in  any  particular  ordei ;  you  can 
"doodle"  if  you  want,  trying  different  d. -signs  and 
erasing  the  parts  that  you  do  not  waiii.  ( )nce  the 
shape  is  drawn  to  your  satisfaction,  press  "S"  to 
construct  the  shape  table.  After  the  table  is  done, 
you  may  see  the  high  resolution  shape  bclore 
starting  on  the  next  shape.  Once  you  have  drawn 
the  desired  number  of  shapes,  you  have  the  option 
of  saving  the  entire  shape  table  on  disk. 

Hi-res  shapes  will  appear  "skinnier"  than  the 
lo-res  shapes  drawn  because  low  resolution  blocks 
are  rectangular  rather  than  scjuaie.  However,  a 
little  practice  will  allow  you  to  easily  visualize  how 
your  hi-res  shape  will  look  and  to  plan  the  lores 
shape  accordingly. 

Since  the  hi-res  shape  table  is  stored  in  the 
second  page  high  resolution  buffer  (starting  at 
16384  or  $4000),  The  Apple  must  have  at  least 
24K  and  Applesoft  in  ROM. 

The  Program 

There  are  few  "fancy  tricks"  used  in  this  program. 
If  you  are  not  familiar  with  the  way  shajic  tables 
are  created  or  used,  you  should  read  Chapter  Nine 
of  the  latest  Applesoft  manual  before  ti)  ing  to 
follow  how  this  program  works.  To  help  explain  its 
operation,  I  have  included  a  list  of  major  variables 
and  subroutines  used  in  the  program,  widi  com- 
ments about  the  uses  of  each. 

Variables  Used  (In  Order  of  Appearanc:e] 

A$     Used  fV)r  all  input  from  the  user. 

SH     The  number  of  shapes  to  be  drawn  fa  maxi- 
mum often).  This  nmnber  is  i'OKKd  into  the 
first  two  locations  of  the  shape  table 

BASE     The  starung  address  of  the  data  for  the 
current  shape.  It  is  initially  set  to  I(i;i84  + 
2^^SH  +  2  because  the  table  starts  at  15384 
and  the  table  index  consists  of  two  bytes  for 
the  number  of  shapes  and  two  bytes  to  point 
to  each  shape. 

NU     The  number  of  the  current  shape. 

TABLE  0     Holds  the  plot  status  of  everv  point  in 
the  shape  area  of  the  scieen.  The  slat  us  is 
based  on  the  following  svslem: 
move  right  (no  plot)  =  I  plot  and  move  right  =  5 

move  down  (no  plot)  =  2  plot  and  move  down  =  6 

move  left  (no  plot)  =  3  plot  and  move  left  =  7 

BLACK,  AQUA,  RED     Hold  the  values  of  the 

corresponding  low  resolution  colors 
COL     A  dual  purpose  variable:  first  it  holds  the 
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number  of  horizontal  elements  in  the  shape 

and  later  it  is  used  as  a  loop  counter  for  the 

columns. 
CI,  C2     Contain  the  horizontal  low  resolution 

screen  limits. 
Rl,  R2     Contain  llie  vertical  low  resolution  screen 

limits. 
X,  Y     Represent  the  coordinates  of  the  current 

plot  position. 
OLD     Holds  the  color  of  the  screen  under  the 

"cursor"  (black  if  nothing  was  plotted,  red  if  a 

point  was  plotted). 
MOVE     Stores  the  plot  value:  either  move  right  (1) 

or  move  left  (3),  depending  on  which  row  is 

being  scanned  (see  the  variables  START, 

LAST). 
DOWN     Stores  the  plot  value  lo  move  down  (2). 

START,  LAST     Hold  the  loop  limits  for  the 

column  counter.  The  first  row  is  scanned  left  to 
right,  the  second  right  to  left,  and  so  on  (always 
moving  clown  one  row  when  the  end  oi  the  cur- 
rent row  is  reached),  so  START  and  LAST  are 
switched  at  the  end  of  each  row. 

INC     Another  dual  purpose  variable:  initially,  it 
holds  the  step  value  for  the  colunm  loop  (1 
means  scanning  left  to  right  and  - 1  means  scan- 
ning right  to  left);  later  it  is  used  to  hold  the 
number  of  bytes  in  the  current  shape. 

B     Holds  the  octal  representation  of  the  current 
byte  to  be  put  into  the  shape  table.  Octal  is  used 
because  in  hi-res  shape  tables,  eight  possible 
moves  are  allowed  (see  the  Applesoft  manual). 

W,  X,  Y,  Z     Store  intermediate  results  in  the  con- 
version of  octal  to  decimal.  X  also  holds  the 
final  (decimal)  result. 

D     Holds  the  length  of  the  shape  table. 

Sections  And  Subroutines  Used 

10—37     Introduction. 

40—400     Print  instructions. 

410-450     Initial  shape  table  setup. 

460-500     Variable  initialization. 

510-700     Low  resolution  screen  setup. 

710-830     Draw  the  lo-res  shape. 

840-1 130     Create  the  hi-res  shajx"  table. 

1140-1240     Display  the  hi-res  shape. 

1250—1500     Save  the  shape  table  on  disk. 

1 1000-11080     Itipui  user  response  (avoids  the 

problems  of  using  INPU  T). 
12000-12100     Print  heading. 
13000-13040     C;o  on  lo  next  screenful. 

Changes  And  Modifications 

A  lunnber  of  changes  to  the  program  are  possible. 
The  colors  of  the  background,  the  flashing  "cursor," 
and  plotted  points  may  be  changed  lu  suit  voiu"  taste 
by  changing  the  values  in  lines  490  and  530  (AQUA 


is  the  color  of  the  "cursor"  and  RED  is  the  color  of  a 
plotted  point).  To  allow  more  shapes  per  table  (up  to 
a  reasonable  limit,  of  course),  change  the  upper 
limit  in  line  425. 

Perhaps  the  most  important  modification 
would  concern  the  speed  of  execution.  Creation  of 
the  shape  table  can  take  up  to  several  tninutes  for 
large  shapes  because  of  the  amount  of  data  in- 
volved. If  the  time  involved  seems  unreasonable  to 
vou,  perhaps  a  machine  language  version  of  lines 
840  to  1 1 30  would  be  in  order.  Since  I  am  not 
proficient  in  machine  language,  1  chose  to  let  Basic 
do  the  job  for  me,  but  I  luii  sure  that  some  enter- 
prising soul  can  come  up  with  a  faster  version.  If 
you  want  lo  tackle  this  problem,  feel  free  to  contact 
me  with  any  questions  that  you  have  about  the  pro- 
gram. 

Using  Shape  Tabies  With  Your  Own  Programs 
There  are  two  ways  that  you  can  use  a  shape  table 
in  y(Hu-  own  program.  Vhc  program  can  read  in 
the  table  from  disk  (using  RLOAD)  or  llie  program 
can  POKE  in  the  values  for  the  table  from  data  in 
DATA  statements.  The  first  method  is  obviously 
easier  to  program,  but  you  must  ensure  that  the 
disk  contaiiving  the  shape  table  is  inserted  in  the 
drive  or  the  user  will  gel  a  nasty  DOS  error 
message. 

The  question  with  the  second  method  is:  how 
do  I  convert  all  those  b)tes  in  memor\'  iiuo  numbers 
in  DATA  statements?  One  way  (the  hard  way)  is  to 
write  a  short  program  which  reads  the  shape  table 
one  bvie  at  a  time,  prints  the  value,  and  lets  you 
write  it  down  before  going  on  lo  the  next  one. 
Then  vou  have  to  type  all  the  values  into  DATA 
statements  and  POKE  ihem  into  memory.  The 
easier  way  is  to  EXEC  a  text  file  which  will  d(}  all 
that  for  you.  Listing  2  coiuains  a  program  which 
will  set  up  such  a  text  file.  To  u.se  this,  set  the 
variable  LINE  in  line  90  to  the  line  number  that 
vou  want  the  POKE  routine  to  start  at,  set  the 
variable  B  in  line  90  lo  the  last  memory  locatit)n  of 
the  shape  table  (lines  I4()()  and  1470  in  the  Apple 
Hi-Res  Shape  Writer  print  ihis  value  for  you), 
RUN  the  program  and  EXEC  the  text  file.  For 
example,  for  a  shape  table  thai  the  computer  tells 
vou  ends  al  17000,  type  (in  the  direct  mode): 

LOAD  POKE  WRITER 

90  LINE  =  5000;  B  =  17000 

RUN 

Now  just  load  your  program,  EXEC!  POKE 
ROUTINE,  and  you  have  added  a  routine,  starting 
at  line  5000  in  this  exam]jle,  that  will  i'OKE  yoiu" 
shape  table  into  memory  every  time  the  program 
is  run. 

I  ho]K-  thai  \()u  enjov  .\]Dp!e  Hi-Res  Sliape 
Writer,  I  ha\e  foinid  it  extrenieh  usehil  in  de- 
signing some  t)f  my  own  games  and  educational 
soi'tware,  and  I  am  sure  that  you  will  i'uul  many 
uses  for  it  too! 
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10  REM  *****if*******ttt*******i^**t*t** 
12  REM  **  APPLE  HI -RES  SHAPE  WRITER  ** 
14   REM  **       BY  DOUG  HENNIG        ** 

20   REM  *********t*t*^*t****.t****tt*t** 

25   HIMEM:  16384 

30   GDSUB  12000 

35   PRINT  "DO  YOU  WANT  INSTRUCTIONS?  ";:  GOSUB  llOOO 

37   IF  A*  =  "N"  THEN   HOME  :  GOTO  400 

40   VTAB  10:  CALL   -  868:  HTAB  3 

50   PRINT  "THIS  PROGRAM  WILL  ALLOW  YOU  TO  CREATE" 

60   PRINT  "UP  TO  TEN  DIFFERENT  SHAPE  TABLES  FROM" 

70   PRINT  "DESIGNS  THAT  YOU  HAVE  DRAWN  ON  THE" 

SO   PRINT  "SCREEN  IN  LOW-RESOLUTION  GRAPHICS. " 

90   VTAB  15:  HTAB  3 

100   PRINT  "THE  PROGRAM  WILL  ASK  FOR  THE  NUMBER" 

110   PRINT  "OF  HORIZONTAL  AND  VERTICAL  ELEMENTS  " 

120   PRINT  "THAT  YOU  WANT.  THESE  NUMBERS  MUST  BE" 

130   PRINT  "BETWEEN  1  AND  40." 

140   GOSUB  13000 

150   HTAB  3 

160   PRINT  "A  BLUE  'CURSORS  WILL  BE  DISPLAYED  TO" 

170   PRINT  "INDICATE  THE  CURRENT  PLOT  POSITION.  USE" 

ISO   PRINT  "THE  GAME  PADDLES  TO  MOVE  THE  CURSOR  TO" 

190   PRINT  "THE  DESIRED  LOCATION  AND  PRESS  ";:  INVERSE  :  PRINT  "P";-  NORMAL 
:  PRINT  "  TO" 

200   PRINT  "PLOT  AT  THE  CURRENT  POSITION;  A  PLOTTED" 

210   PRINT  "POINT  IS  INDICATED  BY  A  RED  SQUARE.  TO" 

220   PRINT  "ERASE  A  PLOTTED  POINT,  PRESS  " ,- :  INVERSE  :  PRINT  "E";-  NORMAL 

:  PRINT  ".  TO" 
230   PRINT  "BEGIN  CREATION  OF  THE  SHAPE  TABLE," 

240   PRINT  "PRESS  ";:  INVERSE  :  PRINT  "S";:  NORMAL  :  PRINT  ".  " 
250   GOSUB  13000 
260   HTAB  3 

270   PRINT  "THE  SHAPE  TABLES  WILL  BE  STORED  IN" 
280   PRINT  "THE  HIGH-RESOLUTION  SECONDARY  PAGE  AREA" 
290   PRINT  "(STARTING  AT  LOCATION  16384,  OR  *4000) . " 
300   PRINT  "YOU  WILL  BE  GIVEN  THE  OPTION  TO  SAVE  " 
310   PRINT  "THE  SHAPE  TABLE  ON  DISK." 
320   PRINT  :  HTAB  3 

330   PRINT  "TO  USE  THE  SHAPE  TABLE  IN  A  PROGRAM,  " 
340   PRINT  "SIMPLY  USE  A  'BSAVE'  COMMAND  WITHIN" 
350   PRINT  "THE  PROGRAM.  NOTE  THAT  THE  HIGH-" 
360   PRINT  "RESOLUTION  SECONDARY  PAGE  WILL  BE" 
370   PRINT  "UNAVAILABLE  FOR  USE." 
390   GOSUB  13000 
400   POKE  34,0 

410   PRINT  "HOW  MANY  SHAPES  WILL  THERE  BE?  ";:  GOSUB  11000 
420  SH  =   INT  (  VAL  (At) ) 

425   IF  SH  <  1  OR  SH  >  10  THEN   VTAB  10:  CALL   -  958:  GOTO  410 
430   POKE  16384, SH:  POKE  16385,0:  REM  PUT  NUMBER  OF  SHAPES  INTO  START  OF  T 

ABLE  INDEX 
440  BASE  =  16384  +  2  *  SH  +  2 

450   POKE  232,0:  POKE  233,64:  REM  TELL  APPLE  WHERE  SHAPE  TABLE  IS 
460  NU  =  0 
480   DIM  TABLE (1600) 
490  BLACK  =  OrADUA  =  6: RED  =  1 
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500  NU  =  NU  +  1:  IF  NU  >  SH  THEN  1250 

510   GR 

520   HOME  :  VTAB  21 

530   CDLOR=  2 

540   FOR  1=0  TO  39:  VLIN  0,39  AT  I:  NEXT 

550   PRINT  "NUMBER  OF  HORIZONTAL  ELEMENTS 

560  COL  =   INT  (  VAL  (A*) > 

570   IF  COL  <  1  OR  COL  >  40  THEN   VTAE  21: 

580   HOME  :  VTAB  21 

590   PRINT  "NUMBER  OF  VERTICAL  ELEMENTS  - 

600  ROW  =   INT  (  VAL  <A*) > 

610   IF  ROW  <  1  OR  ROW  >  40  THEN   VTAB  21 5 


REM  DRAW  BACKGROUND 
i:  GDSUB  11000 


CALL 


958:  GOTO  550 


BOSUB  11000 


620  CI  =   INT  <(40  -  COL)  /  2):R1  =   INT 
630  X  =   INT  (COL  /  2  -~   INT  (COL  / 

W  /  2)  +  0.5) 
640  C2  =  39  -  CI  -  X:R2  =  39  -  Rl  - 
650   COLOR=  BLACK:  FOR  I  =  CI  TO  C2 

ACE  FOR  SHAPE 

HOME  :  VTAB  21 

INVERSE  :  PRINT  "P":  PRINT  "E":  PRINT 


;  CALL 
(  (40  - 


-  958: 
ROW)  / 


GOTO 

2) 


590 


)  +  0.5) : Y  =   INT  (ROW  /  2 


INT  (RO 


660 
670 
680 
690 
700 
710 


VLIN  R1,R2  AT  I:  NEXT  I:  REM  CLEAR  SP 


■S":  NORMAL 


VTAB  21:  HTAB  3:  PRINT 
VTAB  22:  HTAB  3:  PRINT 
VTAB  23:  HTAB  3:  PRINT 
<  =  C1:Y  =  Rl 
720  OLD  =  SCRN(  X,Y) 
730  COLOR=  AQUA:  PLOT  X,Y: 
740  FOR  I  =  1  TO  100:  NEXT 
750   COLOR=  OLD:  PLOT  X,Y 

INT  < (C2  -  CI  +  1) 


'-  PLOT  POINT" 

'-  ERASE  POINT" 

'-  CREATE  SHAPE  TABLE" 


REM  FLASH  CURSOR 
I 


760  X  = 
/ 
770 
780 


/  255  *   PDL 


IF 
IF  Y 


(O) )  +  ClsY  =   INT 
255  *   PDL  (1))  +  Rl:  REM  GET  NEW  COORDINATES 
X  >  C2  THEN  X  =  C2:  REM  DON'T  GO  OUT  OF  BOUNDS 


( (R2  -  Rl 


1) 


R2  THEN  Y  =  R2 


790  KEY  =   PEEK  (49152): A 


PEEK  (49168) 


REM  PLOT  POINT 
Y:  REM  ERASE  POINT 


800   IF  KEY  <     128  THEN  720 

810   IF  KEY  =  208  THEN   COLOR=  RED:  PLOT  X, 

820   IF  KEY  =  197  THEN   COLOR=  BLACK:  PLOT 

830   IF  KEY  <   >  211  THEN  720 

835   REM  CREATE  SHAPE  TABLE 

840   HOME  :  VTAB  21:  PRINT  "CREATING  SHAPE  TABLE" 

850  MOVE  =  1:N  =  0:DOWN  =  2 

860  START  =  CI: LAST  =  C2: INC  =  1 

865   REM  STARTING  AT  THE  UPPER  LEFT  CORNER,  SCAN  BACK  AND  FORTH  ACROSS  ROW 

S 

FOR  ROW  =  Rl  TO  R2 
FOR  CGL  =  START  TO  LAST  STEP  INC 
TABLE (N)  =  MOVE 
IF  COL  =  LAST  THEN  TABLE (N)  =  DOWN:  REM  IF  END  OF  ROW  GO  DOWN 
IF   SCRN(  COL, ROW)  =  1  THEN  TABLE (N)  =  TABLE (N)  +  4:  REM  A  PLOT  POI 


870 
880 
890 

900 
910 


NT 
920  : : N  =  N  +  1 
930  :  NEXT  COL 
940  :TEMP  =  START: START 
950  MOVE  =  MOVE  +  INC  * 
960  : INC  =   -  INC 
970   NEXT  ROW 
980  COL  =  O: INC  =  O 
990  B  =  O:  FDR  I  =  0  TO 
1000  :A  =   INT  (10  ••■•  I 
1010  :B  =  B  +  A 


=  LAST: LAST  =  TEMP 


2:  REM  CONVERT  MOVES  TO  BYTES 
*  TABLE (COL) ) 
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1020 
1030 
1040 
1050 
1 060 
1070 
1 080 
1090 
1100 
1110 

1 1 20 

1130 

1 1 40 

1150 

1160 

1170 

1180 

1190 

1200 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1340 

1350 

1 355 

1357 

1360 

1380 

1390 

1 400 

1410 

1415 

1420 

1430 

1460 

1470 

1480 

1490 

1600 

4999 

5000 

10999 

1 1 000 

11010 


:  IF  B  >  199 
:COL  =  COL  + 

NEXT  I 
W  =   INT  (B  /  100) 
Y  =  X  -  W  *  10:Z  = 
X=64*W+8*Y 

POKE  BASE  +  INC, X 


THEN  B  =  B  -  A:  GOTO  1050 
1:  IF  COL  =  N  THEN  1050 


X  = 
B  - 
+  Z 
INC  = 


INT  <B 
X  *  10 


/  10) 


N    THEN    990 
INCO:  INC    = 


INC  +  Is  REM  PUT  BYTE  INTO  TABLE 


INC 


SHAPE  #"NU"? 


IF  COL  < 

POKE  BASE 

POKE  16384  +  2  *  NU,BASE  ~  16384 

:  REM  POKE  POINTERS  TO  THIS  SHAPE 

POKE  16385  +  2  *  NU,  INT  ((BASE  - 
BASE  =  BASE  +  INC 
HOME  :  VTAB  21 

PRINT   CHR*  (7>"WANT  TO  SEE  HI -RES 
IF  A*  =  "N"  THEN  1250 

HGR  :  SCALE=  1:  ROT=  0 

HCOLOR=  3 

DRAW  NU  AT  140, SO 

HOME  :  GOSUB  13O00 

GOTO  500:  REM  NEXT  SHAPE 

REM    SAVE  ON  DISK 

GOSUB  12000 

VTAB  10:  PRINT  "DO  YOU  WANT  TO 

PRINT  "DISK?  ";:  BOSUB  11000 

IF  A4  <   >  "Y"  THEN  1480 
D  =  BASE  -  16384:  REM   LENGTH  OF  TABLE 

PRINT  :  PRINT  "FILE  NAME  -  ";:  GOSUB  11000 

IF   LEN  (A$)  >  30  OR   VAL  (  LEFT*  (A*,l)) 
7)  -  1:  CALL   -  958:  GOTO  1340 

FOR  I  =  1  TO   LEN  (A*):  IF   MID* 
)  -  1:  CALL   -  958:  GOTO  1340 

NEXT 

PRINT 

PRINT 
KEY  = 
KEY  = 

PRINT 

ONERR 

PRINT 

POKE 

PRINT 

PRINT 

POKE  : 

PRINT 

END 

REM  CONVERT  DECIMAL  TO  HEX 

PRINT  :  PRINT  "THERE  WAS  A  DISK 
REM  "INPUT"  SIMULATOR 

A*  =  "" 


REM  END  OF  THIS  SHAPE 
-  256  *   INT  ( (BASE  - 
INTO  INDEX 
16384)  /  256) 


16384)  /  256) 


GOSUB  11000 


SAVE  THE  SHAPE  TABLE  ON" 


(A4,I,1)  = 


O  THEN   VTAB   PEEK  (3 
'  THEN   VTAB   PEEK  (37 


:  PRINT  "INSERT  THE  DATA  DISK  INTO  THE  DRIVE" 

"AND  THEN  PRESS  ANY  KEY. " 

PEEK  (49152):  IF  KEY  <  128  THEN  1390 

PEEK  (49168) 

:  PRINT  "SAVING  SHAPE  TABLE" 
GOTO  5000 

CHR*  ( 4 ) " BS A VE " A* " , A*4000 , L " D 
216,0 

:  PRINT  "THE  LAST  LOCATION  IN  THE  SHAPE  TABLE" 

"IS  "BASE  -  1". " 
34,0 

:  PRINT  "GOOD  LUCK  WITH  YOUR  NEW  SHAPE  TABLE!" 


I/O  ERROR. 


POKE  216,0:  END 


GET  B* 
IF  B*  = 


11020 

BACK 
11025   IF  B*  = 
11030   IF  B*  < 
11040   IF   LEN 

CE 
11050   PRINT  B*"  "B$; 
11060   IF   LEN  (A*)  = 


CHR$  (13)  THEN   PRINT 


RETURN  :  REM  IF  RETURN  PRESSED  GO 


CHR*  (21)  OR  B*  =   CHRt 

CHR*  (8)  THEN   PRINT 

(A*)  =  0  THEN  11010:  REM 


1  THEN  11000 


(10)  THEN  11010 
B*; : A*  =  A*  +  B«: 


GOTO  11010 


IF  NO  CHARS  ENTERED  IGNORE-  BACKSPA 
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3    NEXT    Is    PRINT 


11070  A*    -       LEFT*     (A*,     LEN     (A*)     -    1> 

11080  GOTO    11010 

11999  REM    PRINTHEADING    AND    SET    TEXT    WINDOW 

12000  TEXT    :     HOME 
12010  VTAB    2:     INVERSE 

12020  FOR    I    =    1     TO    40 t     PRINT    " 

12030  VTAB    4:    HTAB    10:     NORMAL 

12040  PRINT     "HI-RES    SHAPE    WRITER" 

12050  HTAB    13:     PRINT    "BY    DOUG    HENNIG" 

12060  VTAB    7:     INVERSE 

12070  FOR    I    =    1    TO    40:     PRINT    "     ";:     NEXT 

12080  POKE    34,9 

12090  NORMAL    s     VTAB    10 

12100  RETURN 

12999  REM    NEXT    SCREEN    ROUTINE 

13000  VTAB    23:     HTAB    8 

13010  INVERSE    £     PRINT    "PRESS   RETURN    TO 

13020  KEY    =      PEEK     <49152) :     IF    KEY    <     128 

13030  KEY    =      PEEK     (49168) 

13040  HOME    :     RETURN 


PRINT 


CONTINUE": 
THEN    13020 


NORMAL 


e 


PROGRAMS  AVAILABLE  FROM 
COMPUTER  HOUSE  DIV. 

FOR   CIH4«0M«E  Alio  APPLE  COHPUTERS 


ACCOUNTING  SERIES 

—  A/P,  A/R.Job  Coil  ind 
Job  Ejiimatme 

—  Piyioll 

—  Checkwriicr 

—  [nventory 

—  Milling  Liit 

ATTORNEVS  SERIES 

—  Financiil 

—  Legll  Accouoling 

—  Lcgil  Demo 

CBM  PROGRAMWG  AIDS  SERIES 

—  Docu-PrinC 

—  F.E.T. /Recover 

—  Screen  Dump/Repeit 

—  Scrunch  Plui 

—  Sof-Bkup 

—  Soncf 

—  SupcT'R.iin 

—  Tricc-Prim 

—  Viri-Print 


DESIGNERS/ENGINEERS  SERIES 

—  Bcami 

—  Boll  Circle 

—  Machine  Pari  Quoiing 

—  Mjctiine  Pin  Quoting  Demo 

—  Spur  Ceari 

—  Trig/Circle  Tangent 

POLITICAL  SERIES 

—  Politicil  Mailing  List 


REAL  ESTATE  SERIES 

—  Listing! 

—  Hnaltcijl  wilh 
Record  of  Investmenii 

—  Miil/Phone  Li»i 

—  Chcckwriter 


APPLE  PROGRAMING  AIDS  SERIES 

—  ScTTiUich 


Prices  Jc  spccifiMtionj  subject  to  chiuge  wiilioui  notice.  Non  disclosure  stiiement  must  be 

signed  and  returned  ijefore  shipment. 

NOTE:  All  of  thw  peogtimi  ire  menu  driven  and  prompt  the  uMr-  Prevlouj  ex- 
perience il  not  necemry.  only  r>mlluily  willi  lubject  m«terl«l.  Imtruc- 
lions  includeii  with  each  program. 


DEALenS   UAHTED 


COMPUTER  HOUSE  DIV. 
F.L.C..  INC. 


I*}|  ClintWl  Bd.      Jiekwin.  Mich.  4SM2 
TelaplW>4   ISI7I  7B3  2132 


LOGICAL  SOFTWARE,  INC. 

announces: 

MAIL  EXPRESS 

A  NEW  MAIL  LIST  UTILITY  FOR  THE  APPLE  IL 

—  Up  to  2,200  Names  per  File 

—  Sort  by  Company  Name,  Customer  Name, 
City,  State  Zip 

—  Prints  Return  Addresses 

—  Merge  up  to  16  Flies 

—  Easy  User  Definable  Codes  for  City,  State  and 
Zip  1o  Save  Time  and  Disk  Space 

This  is  an  easy  to  use  professionai  quality  mail 
list  able  to  handle  large  or  small  files. 

Introductory  Price  $49.95 
$2.00  Postage  &  HarKJIIng 


Logical  Software,  Inc. 
P.O.  Box  354 
Faftnington,  Ml  48024 
(313)  474-8774 


®  Apple  and  Apple  II  are  registered 
tratjemarks  of  Apple  Computer  !txi       j 
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Adding  A 
Voice  Tracic 
To  ATARI 
Programs  II 

Mike  Doleman 
Richfield,  MN 

Deja  vu?  Not  really.  Those  of  you  interested  in 
making  your  A  lARI  speak,  a  la  a  pre-rccorclcd 
voice  track  in  "sync"  with  your  program  may  recall 
an  article  in  the  Julv/Aug.  \S()  issue  of  COMPUTE! 
which  shows  one  method  oi  doing  this.  Since  what 
\vill  be  explained  in  this  article  results  in  the  same 
effect,  it  is  titled  the  same.  Hopefully  however,  you 
will  agree  tlial  this  new  method  has  advantages. 

Some  problems  do  exist  with  using  the  other 
method  since,  in  that  situation,  the  two  elements  — 
the  voice  track  and  the  program  —  advance  inde- 
pendently of  each  other  and  in  some  situations  are 
vulnerable  to  falling  out  of  svnc.  Obviously  if  the 
two  are  lo  be  in  sync  some  care  must  be  taken  to 
see  that  they  start  out  together.  Not  so  obviously,  if 
you  happen  to  put  the  cassette  into  a  cassette 
player  tliai  rims  at  a  slightly  different  speed  than 
the  one  used  to  obtain  the  time  values,  presto  — 
your  program  and  voice  track  gradually  get  separ- 
ated, after  all  that  vvoik  you  put  into  syncliroui/ing 
them.  (Not  to  mention  the  whole  sync  procedure 
being  a  cumbersome  ha,ssle  even  if  it  works  right.) 

Take  heart,  you  can  do  it  the  way  the  "pros" 
do,  and  you  don't  need  any  "special  hardware"  to 
accomplish  it  with  yoiu- ATARI  svstem.  ^■ou 
probably  already  have  it,  an  ordinary  run-of-the- 
mill  stereo  cassette  tape  recorder  with  two 
microphones. 

With  the  stereo  cassette  recorder  and  the  aid 
of  your  ATARI  you  can  put  a  signal  on  the  digital 
track  of  a  cassette  tape  which  controls  the  advance- 
ment of  the  program,  and  do  it  at  the  same  time 
youVe  recording  the  voice  track  —  thereby  elimi- 
nating the  need  for  doing  all  that  other  "sliif T' 
when  using  the  other  method. 

Here's  the  nuts  and  bolts,  or  should  I  say 
peeks  and  pokes  of  how  it's  done. 


Memory  location  53775  (refer  to  Appendix  I, 
Basic  Reference  Manual)  can  lie  tnade  to  return 
several  values  by  the  Al'ARI  program  recorder  as 
it  plays.  These  values  are  governed,  as  I  mentioned 
before,  by  a  signal  on  the  digital  track  of  [he  cassette 
tape,  so  the  first  thing  to  know  is  which  >ignal  does 
what  to  53775  and  how  to  put  it  on  the  tape  at  the 
proper  time.  The  signal  itself  is  simply  an  audio 
frequency  and  can  be  easily  generated  bv  the 
SOUND  statement  on  your  ATARI.  Specifically 
just  two  tones  are  needed,  one  caused  bv  a  SOUND 
0,5,10,15  statement  and  the  otiier  bv  a  SOUND 
0,8, 1 0,3  statement. 

If  the  signal  is  the  audio  frequency  produced 
by  a  SOUND  0,5,10,15  being  recorded  on  the  tape, 
then  on  playback  in  the  program  recorder  it  will 
cau.se  5,^775  to  retmii  a  255,  if  the  signal  is  changed 
to  a  sound  0,8, 10,3  then  53775  will  return  a  239. 

Now!  If,  in  the  program  which  is  Ix  ing  used 
with  the  voice  track,  a  simple  subroutine  is  placed 
wherever  you  want  the  program  to  stop  and  wait 
for  a  cue  from  the  tape  (the  subioutine  monitoring 
53775  and  holding  if  53775  =  255  or  coniinuing  if 
53775  =  239),  tiien  you  have  total  coniiol,  bv  the 
tape,  over  tlie  progression  of  the  program. 

Now  we're  readv  foi-  the  step-by-step  proce- 
dure to  actually  make  a  tape  that  does  the  jobi 
Presumably  you  already  know  where,  on  the  script 
you  have  written  for  your  voice  track,  you  want  tlie 
program  to  stop  rumiing  and  wait  for  the  voice 
track  to  cue  it  to  begin  running  again.  If  vou 
haven't  done  so  already,  mark  these  plat  es. 
STEP  1.  When  you  .set  up  to  record  voui  voice 
track  (in  the  left  channel  of  yom-  recorder)  also  put 
a  right  channel  microphone  directly  in  front  of 
your  TV  speaker.  ( Ihe  TV  vou  use  with  vour 
ATARI). 

STEP  2.  I.oad  the  following  program  into  vour 
AlARI: 

10  SOUND  0,5,10,15 

20  FOR  X  =  1  TO  500  :  NEXT  X 

30  IFSTRIG(0)=1  THEN30 

40  SOUND  0,8,10,3 

50   FOR  X  =  1  TO  100  :  NEXT  X 

60  GOTO  10 

STEP  3.  Plug  a  jovstick  into  controller  j? <  k  1  of  the 
ATARI.  (Or  a  paddle  and  change  tiie  "S  TRIG'  in 
statement  30  to  a  'P  TRKV.  If  you  ha\e  nriiher 
then  use: 

30  IFPEEK(53279)<>7THEN30 
and  press  any  console  switch  rather  than  a  trigger 
button.) 
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Announcing  3  Challenging  New  Games 
For  Your  ATARI! 


Now  you  and  your  ATARI  800' can  enter  a  world  where  fantasy  is  at  your  fingertips. 
When  you  play  EPYX  gannes,  you  take  command!  You  determine  the  course  of  history!  Vou 
plan  your  strategy!  Here's  more!  Our  role-playing  games  are  in  real-time,  soall  your  decision 
making  has  to  be  done  within  seconds. 

We  believe  that  the  games  you  buy  should  be  superior  and  uniquely  rewarding.  That's  why 
we  design  the  game  before  we  design  the  program.  And  each  game  is  playtested  for  hun- 
dreds of  hours,  so  you  can  be  sure  you're  getting  the  best  game  and  the  best  quality  com- 
puter program  your  money  can  buy. 

Thousands  of  Apple  and  TRS-80  owners  already  enjoy  these  great  simulation  games  —  and 
now  you  too  can  add  them  to  your  col  lection.  They  take  full  advantage  of  the  ATARI'S  unique 
graphics  and  sound  capabilities.  Joysticks  are  optional. 
So  turn  on  your  ATARI  and  escape  to  a  universe  that's  completely  In  your  power! 


Invasion  Orion.  ^       .u. 

Turn  on  your  computer  and  you've  got  an  instant  opponent,  ready  to  challenge  you  in  Invasion  Orion,  the 
complete  tactical  science-fiction  game  from  EPYX. 

You  command  up  to  nine  starships.  Each  ship  "spends"  energy  on  moving,  sheilding  itself  and  firing  Its 
three  weapon  systems  — destructor  beam,  missiles  and  torpedos. 

The  computer  takes  care  of  the  details,  making  the  game  easy  to  play.  And  the  simultaneous  combat  is  re- 
solved quickly,  so  you  can  proceed  with  your  starfleet  decisions. 

Choose  from  three  levels  of  play  difficulty,  30  ship  types  and  10  fictional  scenarios  — or  create  more  of 
your  own!  Invasion  Orion  is  infinitely  expandable! 

•  Color  graphics  and  sound!  •  Complexity:  Intermediate. 

•  Different  every  time  you  play!  •  Playing  time:  20  minutes  to  hours  of  fun! 

•  For  ages  10  through  adult  •  For  one  player. 
Suggested  Retail  Price:  $24.95 


INVASION  ORION 


Rescue  at  Rigel. 

in  Rescue  at  Rigel  you've  got  60  minutes  to  find  your  way  thorugh  a  maze  of  corridors,  chambers,  grav- 
shafls  and  teleportals  to  release  10  humans  held  somewhere  within.  Armed  with  powergun  and 
blaster,  you  must  battle  the  insectoid  aliens  that  Inhabit  the  complex,  and  then  get  the  pris- 
oners—and yourself— ou\  alive  — in  real-time! 

But  the  diabolical  Tollah  race  makes  your  mission  even  harder!  They  move  their  captives  from  room  to 
room,  so  each  time  you  play  you  must  search  again! 

Your  powergun  and  shield  draw  energy  from  your  limited  powerpack.  Your  blaster  has  only  a  handful 
of  charges,  and  your  rescue  ship  is  under  orders  to  leave  — with  or  without  you  — in  60  minutes! 
Can  you  save  the  prisoners  before  your  powerpack  is  depleted?  Can  you  get  back  to  your  rendezvous 
point  in  time?  Or  will  the  10  humans  be  transformed  into  mindless  automatons?  You  are  their  only 
hope! 

•  Color  graphics  and  sound!  •  For  ages  10  through  adult. 

•  Real-time!  •  Complexity:  Intermediate. 

•  Different  every  time  you  play!  •  Playing  time:  20  to  60  minutes. 
Suggested  Retail  Price:  $29.95  '  For  one  player. 


The  Datestones  of  Ryn. 

The  treasured  datestones  of  Ryn  have  been  stolen  by  a  dastardly  band  of  robbers!  And  your  mission  is 
to  retrieve  them  before  the  thieves  can  escape! 

Not  only  does  the  real-time  action  keep  you  on  the  edge  of  your  seat,  but  you  've  got  to  f  i  nish  your  quest 
within  20  minutes!  In  The  Datestones  of  Ryn,  you'll  explore  a  cave  complex  where  the  stones  are 
hidden.  Armed  with  sword  and  bow,  you  must  battle  thieves  and  monsters  to  reach  the  stones. 
You  choose  to  fire  your  bow  or  speak  with  monsters  —  parry  or  thrust,  rest  or  run  —  from  among  14  easy- 
to-use  single-key  or  joystick-controlled  commands.  And  The  Datestones  of  Ryn  has  a  built-in  competi- 
tive scoring  system,  so  you  can  compare  your  skills  with  otfier  players! 

•  Color  graphics  and  sound!  •  Complexity:  Introductory. 

•  Real-time!  •  Playing  time;  5  to  20  minutes. 
Suggested  Retail  Price:  $19.95  *  For  one  player. 

All  of  these  great  EPYX  games  are  available  on  cassette  for  the  ATARI  800  with  32K  of  RAM. 


rt  IJUNKMSUlil 
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STEP 4.  RUN  the  protrram  and  adjusl  the  record 
level  of  the  right  chaniici  so  tlic  signal  is  strong. 
Also  adjust  the  left  channel  appropriately  for 
recording  the  voice  track, 

STEP  5.  Position  the  tape  you  arc  using  for  the 
voice  track  to  the  proper  place  for  recording.  (This 
will  probably  be  imniediatcly  behind  the  program 
it  goes  with.) 

STEP  6.  Begin  recording  the  voice  track  and  every 
time  you  come  to  a  place  previously  marked  in  tiie 
script  for  the  program  to  continue  .simply  press  the 
trigger  button.  (Remember  to  relea.se  it  fairly 
quickly  as  a  safeguard  to  putting  more  than  one 
signal  change  on  the  tape.) 

The  only  thing  you  now  need  in  the  main 
program  is  a  little  subroutine  that  stops  the  program 
and  then  only  allow's  it  to  continue  on  the  cue 
(signal)  you  have  just  put  on  the  tape  along  with 
your  voice  track.  It  is  as  follows: 

0000  GOSUB  6000  (Placed  wherever  you  want  to  stop 

the  program.) 
6000  FOR  X  =  1  TO  500  :  NEXT  X 
6010  X=  PEEK(53775):IFX  =  255  OR  X=  127 

THEN  6010 
6020  RETURN 

Obviously  the  subroutine  does  not  have  to  be 
numbered  6000;  number  it  wiiale\-er  )ou  need  for 


your  own  program.  The  delay  at  6000  is  needed  in 
case  the  program  execution  to  the  ne.vi  place  you 
want  stopped  is  so  fast  that  it  catches  the  tape  still 
signahng  for  a  change,  which  is  not  an  improba- 
bility. And  the  number  127  needs  to  be  included  in 
6010  because  sometimes  the  ATARI  decides  to 
return  it  instead  of  255. 

And  that  is  it!  You  have  just  eliminated  any 
need  to  collect  all  those  ume  values  and  go  back  to 
your  program  to  put  them  in  the  jjroper  place. 
Along  with  that,  there  is  now  no  cliance  (hat  the 
voice  track  and  program  will  go  out  of 'svnc'. 

A  word  about  an  inconvenience  which  may 
manifest  itself  in  the  form  of  the  TV  speaker 
interfering  with  the  voice  track  recording  while 
making  the  signals  for  the  digital  track.  It  may 
be  a  good  idea  to  make  a  direct  hookup  from 
the  ATARI  monitor  jack  to  the  riglii  channel  of 
the  cassette  recorder.  Pin  hole  #3  (upper  left)  is 
the  audio  and  a  1  mega  ohm  resislor  should  be 
used  to  prevent  cross  chamiel  recording.  .Also  note 
that  the  procedure  for  allowing  the  program  to 
tinn  the  program  recorder  on  and  off,  a  necessary 
function  for  making  voice  track/program  combi- 
nations, is  simply  POKE  54018,52  for  'on'  and  60 
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•    HORSE   RACING 
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For  ATARI 

Get  the  most  from  your  ATARI  400. 
Memorv  expansion  to  a  full  48K  is  now 
possible  with  our  48K  Board.  Expand 
your  ATARI  800  with  our  32K  Bo.ard. 

48K  Board     $299 
32K  Board     $199 

INTEC 

Suite  #  111 
3387  Del  Rosa  Ave.  North 
San  Bernardino,  CA  92404 

(714)  864-5269 

CA  residents  add  6  percent  tax 
ATARI  is  trademark  of  ATARI.  Inc. 
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Atari  Tape 
Techniques 

Richard  M.  Kruse 
Wichita,  Kansas 

The  Aktri  4001800  personal  computers  have  more 
built-i})  rapab/lilif's  iIkiii  most  users  trrilizr.  This  article 
expands  on  one  siuh  area  -  Ihe  tape-haudling functions. 
No  special  knowledge  or  equipment  beyond  the  Atari 
cotnputer  and  tape  recorder  is  required,  and  the  Atari 
user  who  is  so  equipped  can  tiy  the  nev  procedures 
immediately.  Included  is  the  listing  for  a  BASIC  program 
called  "Hex  Tape  Dump,"  u'hich  allows  display  and 
examination  of  Atari  tape  records. 

It  is  a  safe  assumption  that  nearly  all  owners  of 
Atari  400/SOO  computers  have  also  acquired  the 
Atari  model  410  cassette  tape  recorder.  This 
peripheral  device  was  originally  shipped  with  each 
Atari  800  c(Miiputer,  but  is  now  sold  as  an  optional 
accessory  useable  with  either  model.  The  410  is  the 
basic  mass  storage  device  in  the  Atari  system.  It's 
simple,  reliable,  and  economical  (roughly  one- 
eighth  the  cost  of  a  single  disk  drive). 

Yet,  it's  also  a  good  bet  that  most  Atari  owners 
are  not  using  their  tape  systems  at  anywhere  near 
full  potential.  Now  we  Atari  fans  are,  in  general, 
no  more  lazy  than  the  rest  of  the  computerists  out 
there,  but,  alas,  we  have  been  a  little  short  on 
information  concerning  our  machines.  We  recog- 
nize, though,  that  the  Atari  folks  out  in  Sunnyvale 
have  struggled  mightily  to  correct  this  situation, 
and  we  applaud  their  efforts.  The  Atari  Basic 
Reference  Manual  is,  in  fact,  a  model  of  organiza- 
tion that  others  would  do  well  to  emulate.  Still,  the 
Atari  is  a  complex  machine,  and  even  this  excellent 
manual  barely  scratches  the  surface  of  Atari's 
capabilities.  This  is  the  case  with  the  more  advanced 
cassette  functions. 

(An  aside:  In  case  you've  heard  about  the  new  Atari 
tech  manuals  ...  yes,  they're  real,  and  they're  crammed 
with  data.  They  are  also  VERY  heavy  reading.  Utdess 
you're  on  easy  speaking  terms  with  the  6502  and  advanced 
machine-language  programming  techniques,  stick  with 
the  material  presented  in  these  pages.  The  .same  high-class 
stuff  will  soon  be  showing  up  here;  a  little  at  a  time  and 
with  enough  explanation  to  make  if  useable  to  all.) 

If  you  ha\e  had  llie  feeling  that  maybe  you 
were  missing  something  along  these  lines,  then 
read  on.  The  information  in  this  article  will  get  you 
past  "CSAV'E"  and  "CLO.AD",  and  show  you  how- 
to  get  more  'bangper  buck' out  of  yoin-4 10  recorder 
while  sticking  with  BASK'  language. 
Atari  fans  ...  to  your  kc\boards! 

THERE'S  LIFE  BEYOND  CLOAD! 

First,  let's  examine  some  tape  fimctions  whose 


commands  are  built-in;  thai  is,  no  POKES  or 
PEEKS  are  recjuired.  Take  a  few  moments  here  to 
dust  off  your  Atari  Basic  Reference  Manual  and 
reread  the  descriptions  in  the  "Input/Output 
Connnands"  section  for  'T.NTER",  "INPUT", 
"LOAD",  "OPEN/CLOSE  ",  'PRINT",  "PUlV 
GET",  and  "SAVE".  Each  of  these  commands  is 
applicable  to  a  tape  function,  and  there  arc  impor- 
tant differences  between  them  which  seem,  on  the 
surface,  to  be  redundant. 

THE  LONG  AND  SHORT  OF  IT 

All  data  written  to  tape  by  the  Atari  OS  (oper- 
ating System)  is  first  formatted  into  128-byte 
blocks  called  RECORDS.  The  OS  then  appends 
four  additional  bytes  of  control  data  to  each  record, 
forming  132-bytc  FRAMES.  Since  128  bytes  is  a 
fairly  small  amount  of  data,  several  frames  will 
normally  be  recorded  sequentially  to  make  a  FILE. 
Adjacent  frames  in  a  file  are  never  contiguous, 
however,  but  are  separated  by  non-data  spaces 
called  INTER-RECORD  GAPS  (IRG's).  Refer  lo 
Figure  I,  which  is  a  pictorial  diagram  that  should 
help  clarify  the  relationship  between  these  entities. 

We  now  have  enough  information  to  under- 
stand and  appreciate  the  difference  between 
CSAVE  and  SAVE"C".  Both  of  these  BASIC 
commands  save  a  BASIC  source  program  to  the 
cassette,  but  CSAVE  uses  short  IRG's  (less  than  a 


I 

A  Data    Byte 


A  Data    Frame 


Figure  1:    128  data  bytes  (a)  are  combined  with  four  control 
bytes  to  make  a  data  frame  (b).  A  file  (c)  consists 
of  a  leader,  one  or  more  data  frames,  and  an  End- 
Of-File  frame. 
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second)  while  SAVE"C"  uses  long  gaps  (about 
three  seconds). 

What  practical  difference  does  this  make?  And 
why  would  I  ever  use  SAVE"C"  anyway,  since  it 
makes  the  snail-like  pace  of  program  loading  even 
slower?  Okay,  here  we  go.  The  significance  of  long 
IRG's,  and  the  reason  for  providing  the  option  to 
use  them,  is  this:  The  long  gap  provides  just 
enough  space  between  records  to  stop  the  tape 
drive  motor,  restart  it  when  ready,  and  bring  the 
tape  back  up  to  speed  before  the  beginning  of  the 
next  sequential  frame  of  data.  This  cannot  be 
accomplished  with  short  gaps,  and  under  some 
conditions  the  computer  cannot  accept  data  fast 
enough  to  accomodate  non-stop  operation.  (In  all 
fairness,  there  is  another  reason  for  the  apparent 
redundancy  of  CSAVE  and  SAVE"C".  While 
CSAVE  apphes  specifically  and  only  to  the  tape 
recorder,  SAVE"C"  is  one  form  of  a  more  general 
command  that  also  applies  to  disk  files.) 

Now,  I  can  almost  hear  you  saying,  "Well, 
that's  nice  to  know,  sort  of,  but  the  information 
doesn't  really  seem  too  useful."  Right?  You  would 
be  right,  of  course,  except  for  a  function  called 
RUN"C"  which,  according  to  the  Reference  Man- 
ual, loads  a  BASIC  program  and  immediately 
begins  execution.  The  only  problem  is,  it  doesn't 
work  with  a  CSAVE'd  program  ...  Aha!  You're  way 
ahead  of  me.  Yes,  indeed,  try  SAVE"C"  and  you'll 
find  that  RUN"C"  works  exacdy  as  advertised. 
Atari  has,  in  fact,  given  you  a  hint  on  this  without 
really  explaining  the  reasons.  Look  at  the  Reference 
Manual  section  on  "Chaining  Programs."  Makes 
more  sense  now,  doesn't  it?  The  specific  rule  is  that 
CLOAD,  LOAD"C"  and  RUN"C"  will  all  read 
source  programs  written  with  SAVE"C",  but  only 
CLOAD  will  read  CSAVE'd  material. 

By  the  way,  I  should  point  out  that  the  correct 
form  is  actually  SAVE"C:"  with  a  colon  following 
the  device  name.  The  Atari  OS,  however,  allows 
only  one  cassette  drive,  and  does  not  support  file 
names  (ouch!)  in  tape  files.  This  being  the  ca.se,  no 
further  information  following  "C"  in  a  command 
string  is  actually  used. 

ONLY  TOKENS  WILL  BE  ACCEPTED... 

There  is  still  another  way  to  save  BASIC 
programs,  much  different  from  either  CSAVE  or 
SAVE"C",  and  serving  a  unique  purpose.  The 
Atari  personal  computers,  like  most  of  their  cousins, 
store  BASIC  source  programs  internally  in  a  kind 
of  shorthand  called  the  TOKEN  IZED  form.  A 
token  is  a  one-or  two-byte  (typically)  code  that 
represents  a  BASIC  keyword  such  as  GOSUB  or 
PRINT.  Source  programs  are  encoded  into  this 
shorthand  form  in  order  to  conserve  memory 
space  in  the  computer. 

The  significance  of  tokenization  to  our  discus- 
sion is  that  both  CSAVE  and  SAVE"C"  write  the 
shortened,  tokenized  form  of  your  BASIC  program 


to  the  cassette.  Not  surprisingly,  CLOAD, 
LOAD"C",  and  RUN"C"  all  recognize  only  this 
abbreviated  code.  There  exists,  however,  a  method 
of  storing  the  original,  expanded  ASCII  source 
code.  And,  just  as  with  long  IRG's,  there  are  a 
couple  of  good  reasons  to  use  this  method. 

CAUTION:  MERGING  TRAFFIC 

Every  BASIC  programmer  is  familiar  with  the 
LIST  command,  with  which  he  can  review 
previously-entered  source  code  on  the  CRT  or 
produce  a  permanent  program  listing  ou  a  printer. 
Atari's  treatment  of  I/O  devices,  however,  allows 
you  to  LIST  your  program  to  the  cassette  as  well. 
The  command  format  is  LIST"C",  to  save  all 
source  lines;  or  LIST"C",X,Y  lo  save  oniv  lho.se 
from  line  X  to  line  V,  inclusive.  Either  wav,  program 
hues  will  be  stored  in  full  ASCII  form,  ind tiding 
line  numbers,  REMarks,  and  (most)  spaces.  There 
has  to  be  a  way.  of  course,  to  retrieve  such  a  listing, 
and  this  is  done  with  the  command  ENTER"C". 

The  LIST"C:"/ENTER"C"  sequeno-  has  one 
particular  characteristic  that  makes  it  inciispcnsible 
in  preparing  BASIC  programs.  Unlike  CLOAD 
and  LOAD"C",  which  both  clear  any  B.ASIC: 
source  lines  from  memory  before  loading, 
ENTER"C"  does  not  necessarily  disturb  a  resident 
program.  This  means  that  you  can  merge  often- 
used  routines  into  a  BASIC  program  without 
having  to  retype  them  each  time.  Once  you  become 
familiar  with  iliis  process,  it  can  save  lots  of  time 
and  effort. 

Actually,  ENTERinga  soLuxe  program  from 
tape  is  exactly  equivalent  to  typing  source  lines  at 
the  kcyfjoard,  and  the  same  rules  generally  apply. 
If  a  line  is  entered  from  tape,  for  example,  having 
the  .same  line  number  as  a  line  already  in  memory, 
the  old  line  will  be  replaced. 

THE  INCREDIBLE  SHRINKING  CODE 

Another  interesting  and  potentially  useful 
effect  of  the  LIS T"C"/ENTER"C"  sequence  is  that 
it  can  actually  reduce  the  size  of  your  BASIC 
programs.  1  stumbled  across  this  undocumented 
characteristic  while  doing  my  "homework"  for  this 
article,  and  I  do  not  at  present  know  the  reasons 
for  it.  Here's  how  to  try  it  for  yourself: 

CLOAD  a  BASIC  program,  preferably  one 
that's  undergone  lots  of  editing.  When  it's 
loaded,  type  "PRINT  FRE(O)",  and  write 
down  the  munber  of  unusetl  memory  bytes. 
Now  store  the  source  back  to  tape,  using 
LIST"C".  Clear  the  computer's  BASIC  pro- 
gram area  by  typing  "NEW,"  and  reload  the 
code,  using  ENTER"C",  from  the  tape  just 
made.  Finally,  type  "PRINT  FRE(O)'  again, 
and  compare  the  result  with  the  oni-  vou  write 
down. 

I  have  tried  this  on  several  existing  programs, 
and  have  gotten  memory  savings  anywhere  from  a 
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^xtwizard  ^  transforms  Atari  into  a 
powerfully  serious  word  processor. 


Textwizard"'  is  no  kids  game.  It's  a  sophisticated 
and  complete  word  processing  program  for  the 
**Atari  800  computer. 

Here  is  instant  control  over  the  aeation,  editing 
and  formating  of  any  writing.  Insert  words.  Replace 
phrases.  Delete  sentences.  Move  paragraphs.  Auto- 
matically repositions  surrounding  text.  *Textwizard'" 
does  it  all  with  over  50  simple  commands. 

On  your  command,  Textwizard'"  will  search  out 
and  correct  mistakes  throughout  your  document. 
And  it  protects  you  from  common  operating  errors 
by  warning  you  before  you  make  them. 


Textwizard"  will  print  out  as  many  original 
"copies"  as  you  need.  In  boldface,  elongated  or  con- 
densed lettering,  upper  or  lowercase,  with  propor- 
tional spacing.  And  you  can  store  your  work  on  a 
diskette. 

So,  whether  you  write  legal  briefs,  computer 
programs,  or  The  Great  American  novel,  Textwizard™ 
can  make  your  work  easier.  And  though  it's  no  toy, 
it's  fun  to  use. 

At  S99.95,  you  don't  have  to  write  a  best-seller 
to  afford  Textwizard™  Textwizard™  is  another  of  the 
many  creative  products  from  Datasoft. 
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N-ii/  COMPUTER  SOFIWARE 


Software  for  people  who  aren't  easy  to  please. 

19519  Business  Center  Drive/  Northridge,  California  91324/(213)  701-5161 

Check  your  local  software  dealer  or 
Send  check  or  money  order  with  $2.00  postage/handling.  California  residents,  add  6%  sales  tax. 

•Textwizard  will  perform  on  a  32K  system  with  one  or  more  disc  drives.  It  is  compatible  with  the  Atjri  V825,  Centronics '737  and  Epson'  MX-80  printers. 

"Atari  is  a  registered  trademarl<;  of  Atari  Computers  Inc. 
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few  bytes  (who  cares!)  to  o\'er  500  bytes  (impres- 
sive!). As  I  said  earlier,  I  liaven't  delveci  into  the 
reasons  for  tins  eilect,  but  an  observation  of  the 
results  quickly  sliows  one  repeating  pattern.  The 
memory  saving  seems  to  be  greatest  ^vhen  applied 
to  programs  that  have  been  lieavily  "massaged" 
through  editing,  especially  if  variables  have  been 
used  and  then  discarded.  If  true,  the  implication  is 
that  the  Atari  line-editing  process  is  not  one 
hundred  percent  effective  in  deleting  pi'ogram 
statements.  Hopefully  an  inquisitive  reader  will 
determine  exactly  what  it  is  worth  for  himself. 

BASICALLY  BASIC  FILE  HANDLING 

As  we  have  now  seen,  the  Atari  cassette  s\'stem 
suffers  from  the  worst  drawbacks  of  all  such 
systems.  It  is  slow,  file  names  are  not  supported, 
and  only  a  single  device  can  be  used.  Furthermore, 
except  for  the  motor,  the  recorder  is  under  manual 
control,  and,  in  fact,  the  computer  cannot  even  tell 
whether  or  not  the  tape  is  running!  The  combina- 
tion of  these  characteristics  pretty  well  precludes 
any  but  the  most  elementary  file-handling  func- 
tions. This  section,  therefore,  may  be  seen  mostly 
as  an  exercise  with  only  minimum  practical  value. 

It  is  possible  to  store  and  retrieve  data  via  the 
cassette  recoider  from  within  a  BASIC  program 
using  only  built-in  commands.  Once  again,  the 
Atari  BASIC]  Reference  Manual  alludes  to  this,  but 
docs  not  go  into  sufficient  detail  so  that  users  can 
fully  undeistand  the  methods.  The  problem  is 
complicated,  in  this  case,  by  an  acknowledged  OS 
"bug"  which  may  thwart  attempts  to  u.se  the 
capability. 

Due  to  the  limited  usefulness  of  the  tape  file 
functions,  we  will  not  spend  nuich  time  on  them, 
except  to  define  how  they  are  invoked. 

The  cassette  recorder,  like  all  Atari  I/O  devices, 
must  be  identified  to  the  OS  before  it  can  be  used. 
This  is  the  function  of  the  OPEN  command,  which 
links  the  cassette  function  to  one  of  the  INPUT/ 
OUTPUT  CONTROL  BLOCKS  (lOCB's).  The 
command  structure  is  OPEN#  1 ,4,0, "C"  to  read 
from  tape,  or  OPEN#1,8,0,"C"  to  write.  You 
cannot  open  the  cassette  for  simultaneous  read 
and  write,  for  ob\  ious  reasons.  The  first  parameter 
in  the  OPEN  command  (#1,  above)  tells  the  system 
which  of  tlie  eight  lOCB's  to  assign.  They  are 
numbered  from  zero  through  seven,  anci  as  far  as 
the  OS  is  concerned  they  are  all  functionally 
identical.  Stay  a^vay  from  #0  and  #7,  however, 
since  these  two  lOCB's  are  "appropriated"  by  the 
OS  for  the  screen  (#0)  and  for  its  own  tape  functions 
(#7).  The  second  parameter  identifies  the  "direc- 
tion" of  data  flow;  either  input  to  the  computer 
("4")  or  output  from  the  computer  ("8").  The  third 
parameter  is  not  used  by  the  cassette  system  but 
must  be  present  in  the  command  ...  use  "0". 

Once  the  cassette  is  opened,  you  may  read  or 
write  data  either  as  pure  binary  bytes  or  as  ASCII- 


encoded  chaiacter  strings. 

To  write  a  single  byte  (any  value  from  0  to 
255),  use  the  command  PU'f#l,X.  (X  is  a  repre- 
sentative name  for  any  variable  whicli  evaluates  to 
an  integer  value  in  the  rangejust  stated. j  (;ET#  1  ,X 
is  the  corresponding  command  which  will  read 
these  values  back.  It  is  important  to  realize  that 
noaUng-poini  numerical  values  are  represented 
internally  as  multi-byte  groups,  and,  as  such, 
cannot  be  handled  directly  by  PUT  or  CFT. 

The  other  method  oi  saving  and  retrieving 
tape  data  is  to  use  ASCII  representation,  with  one 
character  per  byte.  This  method  is  considerably 
less  efficient  with  tape  space,  but  docs  allow  vou  to 
store  anything  that  can  be  represented  in  a  PRINT 
statement,  fhe  PRINT  command,  in  f;i(t,  is  what 
you  use  to  write  such  information,  usin:^r  PRINT 
#1  ;data.  The  data  can  be  numeric  varial)les,  string 
variables,  literals,  arrays,  or  any  combination  of 
these,  just  as  in  an  ordinary  PRINT  coiinnand.  (In 
this  way  floating  point  values  can  be  saved.  The 
value  2.45,  for  example,  would  be  wrilt  ,-n  as  a 
series  of  four  ASCII  bytes:  32,2E,34,:k")  (hexade- 
cimal representation).)  Be  aware  that  the  system 
will  append  the  End-of-Line  character  (i)BII)  to 
the  last  data  item  unless  the  PRINT#I  siatement  is 
terminated  with  a  semicolon  (;). 

The  corresponding  command  for  reading 
ASCII  data  back  is  INPU  r#l,var.  Here  is  where 
the  EOL  character  just  mentioned  becomes  very 
im[jortant-ihe  INPUT#I  command  will  attempt  to 
keep  reading  imtil  it  llnds  this  character.  IN- 
PUT#L  like  PRINT#L  uses  the  same  general 
rules  as  does  its  kevboard-rclated  counterpart. 

Following  the  last  PUI#1  or  PRIN  r#I 
command,  a  cas.sette  file  absolutely  must  be  cio.sed, 
using  CLOSE#].  If  you  do  not  do  this,  vou  will 
lose  some  of  the  data  that  you  thought  was  written. 

At  this  point  we  need  to  look  at  some  of  the 
internal  "mechanics"  used  bv  the  Atari  OS  to 
format  yoiu-  data  into  the  1 28-byte  records  which 
are  actually  recorded.  A  131-bvtc  block  of  memory 
locations  is  reserved  for  use  as  a  cassette  buffer. 
(This  is  identified  in  your  BASIC  Reference 
Manual  Memory  Map  as  addresses  3EI)i  I  through 
47FH.)  Each  time  you  execiUe  a  PUT#1  or 
PRINT#1  command,  the  resultant  data  is  tempo- 
rarily stored  in  the  last  128  bytes  of  this  buffer. 
Each  time  the  1 28th  byte  is  stored,  the  Atari  imme- 
diately suspends  operation  of  your  program,  starts 
the  cassette  motor,  writes  the  data  block,  and  stops 
the  motor.  'Fhe  internal  bid'fer  pointer  is  then 
reset  to  zero,  and  control  is  returned  to  voiu" 
program  (which  could  actually  be  in  the  middle  of 
chunpingdata  from  a  PRINT#I  statement!).  In 
order  for  any  of  this  to  happen,  of  course,  the 
ca.s.sette  must  first  be  OPENed  as  already 
described. 

Opening  the  device  for  a  write  operation 
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causes  this  sequence  of  eveiiis:  ( 1 )  iwo  bcc])s  are 
emitled  from  the  console  s|K-aker,  and  (he  coni- 
puler  waits  for  you  to  enable  ilie  recorder;  (2)  llie 
cassette  motor  is  started;  0)  approximately  20 
seconds  of  "leader"  tone  is  written;  and  (1)  ihe 
motor  is  stopped  ...  OOPS!!!  Correction-ihe  motor 
keeps  on  running!  Here  is  the  OS  "glitch"  men- 
tioned earlier.  The  motor  will  not  stop  until  the 
first  data  record  has  been  written.  Tiie  easiest  way 
to  gel  around  tliis  is  to  immediately  write  a  "dtmi- 
my"  record  using  zeroes  or  spaces,  or  any  other 
data.  Here's  how  to  do  it: 


100  OPEN#1,8,0,"C" 

110  FORI  =  0TO  127:PUT#1,0:NEXTI 


Your  program  will,  of  course,  have  to  allow 
for  this  dimiiuy  record  when  retrieving  the 
data.  Once  the  first  record  has  been  written, 
the  system  is  back  on  good  behaviour  ...  the 
motor  is  started  only  when  t!ie  buffer  needs  to 
be  dumped,  and  stopped  promptly  after 
writing. 

Realizing  that  there  is  an  intermediate 
data  buffer  between  your  program  and  the 
cassette  clarifies  the  need  to  close  all  files.  The 
CLOSE  command  immediately  causes  the 
buffer  to  be  dumped  to  the  tape,  even  though 
it  may  not  be  i'nil.  (This  is  why  you  will  lose 
data  if  a  file  is  not  closed  properly).  After  the 
last  data  record  is  written,  the  OS  (aulomati- 
calh )  appends  an  End-of-File  record  before 
stopping  the  tape.  NOTE:  The  END  statement 
automatically  closes  all  open  files,  but  STOP 
does  not. 

Please  note  that  the  lOCB  number  need 
not  be  #1  as  in  these  examples,  but  must  be 
the  SAME  value  in  all  OPEN,  GET,  PU  T, 
INPUT,  PRINT  and  CEOSE  statements 
accessing  this  particular  file. 
BRINGING  IT  ALL  TOGETHER 
The  BASIC  program  listing  which  follows 
accomplishes  two  things:  it  illustrates  one  possible 
metlKxl  of  reading  a  tape  file  from  BASIC!,  and  it 
provides  a  function  that  will  prove  indispen.sable  to 
you  when  you  try  some  of  the  procedures  that  we 
have  explored.  The  program,  called  "Hex  Tape 
Dump,"  reads  any  Atari-recorded  file  having  long 
IRG's,  one  record  at  a  time.  After  each  record  is 
read,  the  contents  of  that  record  are  displayed  on 
the  screen  in  both  hexadecimal  and  ASCH  form. 
This  program  makes  use  of  a  very  important 
bit  of  information  not  yet  discussed.  Oncol  the 
additional  control  bytes  automatically  appended  to 
each  record  prior  to  writing  contains  a  cofle  de- 
scribing the  length  and  nature  of  that  record.  I'his 
bvle  shows  up  at  location  1023  (decimal)  following 
a  read,  and  can  have  one  of  thiee  values,  with  the 


following  meanings:  252  (decimal)  means  that  the 
record  just  read  is  a  full  record;  (hat  is,  it  contains 
128  bytes  of  valid  data.  250  (decimal)  indicates  that 
the  record  is  only  parUy  filled.  In  this  case  only,  the 
last  bvte  of  ihe  buffer  will  contain  the  actual  number 
of  valid  data  i>ytcs.  254  (decimal)  says  that  this  is  an 
End-of-File  record,  in  which  all  data  bytes  are  zero. 
When  you  find  this  control  code,  you  have  read 
past  the  end  of  valid  data. 

"Hex  Tape  Dump"  is  an  ordinary  BASIC 
program  in  all  respects,  and  it  is  self-prompting 
when  entered  exactly  as  shown.  Try  it,  and  then 
spend  some  time  playing  with  the  BASIC  cassette 
functions.  You  will  end  up  with  an  even  greater 
appreciation  of  the  capal^ililies  of  this  machine 
called  ATARI. 

*AT.\ltI  is  a  regislfU'd  ii  atlciiiiirk  ot  Win  iicr  C:()!iimiinkattoiis  Int. 


LISTING  1:  HEX  TAPE  DUMP 

lO    GRflF^HICS  0:DIM  EUF  <B) 

15    TRUE=- 1 : FftLSE=0: FBT=TRUE: TDP=TRUE: PAGE-FfiLSE 

20    PRINT  CHR*  <  125)  :  PRINT"      >>.-  ATARI  HEX 

TAPE  DUMP  ;■;<" 
25    PRINT:PR1NT:PRINT"P0SITIDN  TAPE  TD  START  OF 

FILE,  THEN" 
-TO    PRINT"PRESS  M  PLAY  A  :M  RETURN  J^  Si  STAND  BY... 
35    REM  OPEN  THE  CASSETTE  FOR  READ 
40    TRAP  1000: REC=1: OPEN  #1,4,0, "C" 
45    REM  DSPLY  EIQHT  BYTES  PER  LINE 
30    FDR  I=!  TO  a 

35    REM  FILL  LINE  IF  OUT  OF  DATA 
bf<  IF  PAGE  THEN  PRINT"—  "  ;  :  BUF  ( I )  =0:  GOTO  100 

70    GDSUB  500:BUF(I>=BYTE: IF  NOT  TOP  THEN  90 
75    REM  PRINT  TOP-OF-PAGE  HEADER 

BO    TaP=FALSE: PRINT  CHR* ( 125) i PRINT" >  RECORD  #" ; 
REC;  ".  .  .  "-.  NBTS+l!  "  BYTES" 

85    PRINT:  PRINT" HEX -ASCII 

—  ":PR!NT 
90    GOSUB  2000:PRINT"  "; 
100   NEXT  I: PR  I NT"   ": 
105   REM  NOW  PRINT  ASCII  FROM  BUF 
lio   FOR  1=1  TO  8:BYTE=BUF(I> 
120   IF  BYTE';32  OR  BYTEM22  THEN  BYTE=46 
130   PRINT  CHR*(BYTE) ; :NEXT  I 
150   PRINT: IF  NOT  PAGE  THEN  50 

160   PRINT:PRINT"PR£S  /.I  SPACE  M  TO  CONTINUE..."; 
170   REC^REC+l : PABE=FALSE: TOP=TRUE 
175   REM  WAIT  FOR  USER  RESPONSE 
180   IF  PEEK  (764)  0-33  THEN  IBO 
170   FOI-E  764,  255:  GOTO  50 
500   REM  READ  BYTE  !■<  SET  FLASS 
505   GET  #1, BYTE: IF  NOT  FBT  THEN  60O 
510   FBT=FALSE : NBTS=1 : STAT=PEEK ( 1023> 
520   IF  STAT=250  THEN  NBTS=PEEK ( 1 151 ) 
530   IF  STAT=252  THEN  NBTS=12a 
600   NBTS=NBTS-l: IF  NBTS>0  THEN  RETURN 
610   FBT=TRUE:PAG£=TRUE:  RETURN 
lono  REM  DONE  OR  ERROR 
1005  PRINT: IF  PEEK ( 195 ) =1 36  THEN  PRINT  CHR«(2B): 

'•«»*  READ  FAST  END-OF-FILE  ***":END 
1010  PRINT  CHR«(28);" — TASK  ABORTED. .. ERROR  NUMBER 

PEEK( 195) :END 
2000  REM  PRINT  ONE  BVTE  IN  HEX 
ZOOS  NYB=INT (BYTE/16) :GOSUB  2100 
2010  NYB=BYTE-NYBtl6 

2100  IF  NYB<:10  THEN  PRINT  CHRt  (NYB+4a)  ::  RETURN 
2110  IF  NYB<16  THEN  PRINT  CHRt (NYE+5S) ;: RETURN 
2120  PRINT  "  I  ";: RETURN 
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Atari 

Graphics: 
16  Colors! 

Clyde  H.  Spencer 
Mountain  View,  CA 

Would  you  like  to  be  able  to  have  graphics  displays 
wilh  mure  than  four  colors  on  the  screen  siniul- 
laneously?  Would  you  find  it  useful  to  be  al)lc  to 
draw  dotted,  colored  lines  or  fill  shapes  with 
textured  color?  If  your  answer  is  ves,  then  read  on 
and  I  will  tell  you  how  lo  do  something  that  not 
only  isn't  documented,  but  if  you  could  find  some- 
one at  A7V\RI  to  talk  ;it)oui  ii,  they  woidd  proiiably 
tell  you  "it  can't  be  done  without  the  GTIA  ciiip." 
Ihat  is  the  creation  (or  at  least  simulation)  of  a 
variation  of  playfield  graphics  modes  9.  10  and  1 1. 

I  can  almost  hear  vou  mumbling  to  vourself 
now,  "I  didn't  know  there  were  graphics  modes 
higher  thaii  S!  And  what  is  tliis  thing  called  a 
(;  I  lA  chip?"  Let's  talk  about  the  (iMA  chip  fust. 
As  1  have  been  able  to  unscramble  the  history  of 
this  little  wonder  called  C.eorge's  Television  Inter- 
face Adapter  chip,  ii  started  out  life  as  a  custom 
designed  prototype  that  would  do  everything  that 
the  production  CTIAchip  (thechipin  thecomputcr 
that  handles  the  graphics)  does  and  a  little  moic. 
That  little  more  was  GRAFF1ICS  modes  9.  10  and 
i  1,  Thev  have  a  resolution  of  80  pixels  hori/outallv 
by  19'i  pixels  veriicalh  widi  up  lo  Ki  difietcni 
colors  or  luminescences  on  the  screen  sinuillane- 
ously,  out  of  the  128  possible.  But  alas,  the  lost 
little  chips  were  never  \nn  into  production.  In 
order  lo  meet  marketing  deadlines,  the  simpler, 
less  powerful  CTFIA  chips  were  insta!le<l  in  the 
[>roduc(ion  model  computers.  I'hat  is  the  l)ad 
news!  The  good  news  is  that  the  Operating  System 
and  8K  Shepard.son  BASIC-  were  written  with  the 
ability  to  implement  these  higher  graphics  modes, 
if  the  GTIA  were  installed.  1  his  was  presimiably 
done  either  as  a  hedge  against  a  lasl-miniue  mar- 
keting decision  to  put  it  in,  or  with  a  view  to  offering 
this  chip  sometime  in  the  future  as  a  tnodel  upgrade 
like  new  chrome  on  a  "Detroit  behemoth."  But  vou 
lu-ed't  wail  for  next  \eai"'s  model.  \\  ith  a  litile 
I'KKKingand  POKKing  and  a  modification  of  the 
display  list  (see  the  article  by  Palcheit  in  Vol.  1 . 
issue  (">  of  COMPUTE!)  you  loo  mav  have  colored 
icing  on  yom-  cake. 

The  Irick  is  accomplished  with  a  slioii  subrou- 
tine that  modifies  the  C  iR.M'l  I  IC:.S  mode  S  displa\ 
list  U)  look  tike  wliat  a  (iR.APIIICS  mode  10  display 
lisi  should  look  like.  I  his  is  accomplished  b\' 


replacing  the  graphics  type  (instruction  operation 
code)  for  GRAPHICS  mode  <S,  in  the  display  list, 
with  the  graphics  type  for  GRAPHICS  mode  10, 
Finally,  it  is  necessary  to  poke  a  10  into  one  of  the 
appro])riate  Operating  System  "shadow"  registers 
in  R.A.VI  to  tnake  the  system  expect  to  find  more 
than  four  colors  to  display.  Table  1  is  a  listing  of 
the  subroutine  which  1  call  "TEN,".  The  subroutine 
starts  at  line  number  ;^20()0,  so  that  it  can  be  ap- 
pended easily  to  almost  any  size  program.  It  is 
liberally  sprinkled  with  lemarks,  \\]  essential 
siaiemenisarenuiltiplesol  10;  the  other  line  numbers 
are  REMark  statements,  which  may  be  deleted, 

I'nforlunatelv,  it  is  difncult  to  select  anv  given 
desired  combination  of  colors  because  there  is  an 
interaction  between  the  color  registers;  setting  a 
particular  value  mav  affect  the  others.  (Generally,  it 
will  require  considerable  experimentation.  1  have 
as  yet  been  imable  to  disco\'er  how  exactly  to 
prerlicl  color  selection.  What  I  have  observed  is  as 
f<»llows:  Color  registers  0,  I  and  2,  loaded  with  the 
SETCOLOR  command,  create  solid  colors  for 
■DATA"  values  (see  "PALLKTTE".  lable  2)  of  5, 
10  and  l.'>.  respectively.  The  other  "DA  f  .\"  values 
will  create  colors  that  may  be  interspersed  with  the 
backgroimd  color.  However,  SF.TCOI.OR  0  also 
effects  "D.'VT.A."  values  1,4,  6,  and  9.  Similarly. 
SETCOLOR  I  effects  2,  6,  8  and  9  and  SETCOLOR 
2  effects  8,  7,  11,  12.  13  and  14.  By  appropriate 
choice  o(  color  and  lumiiiescenc  e  value;  for  the 
color  registers,  more  than  .'i  solid  colors  may  be 
created.  There  always  .seems  to  be  some  dtiplicaiion 
of  colors,  but  you  can  expect  lo  get  three  to  nine 
solid  colors  and  an  additional  five  or  six  ccjlors  that 
wilt  create  dolled  lines.  To  get  an  idea  of  the  colors 
thai  (an  l)e  created,  run  "PAI.ET  IK.  "  li  will  draw 
bands  o(  color  cortesponding  to  "DATA"  values  of 
zero  to  15.  from  the  top  down.  Experiment  with 
changing  the  constants  A.  B  and  C:  and  ■ice  what 
happens!  Ifanvonccan  shed  more  lighi  on  this 
sut:)jecl,  I  wotild  appreciate  hearing  about  it. 

.A  printout  of  the  \arious  modes"  display  lists 
would  be  instructive  on  how  the  ATARI  does  its 
graphics  displays.  But,  with  198  addresses  and 
their  conteius,  it  would  consume  loo  much  space  in 
this  article.  Alternatively,  I  have  provided  vou  wilh 
a  short  program  called  "DISPL.WLIST"  (.see 
Table  3)  that  will  dump  tlie  standard  display  lists  to 
your  printer.  If  you  wish  to  examine  the  "special" 
disphu  list  also,  then  first  merge  the  subroiuine 
•  I  KN  ■  wilh  "DISPI.A\  IIS  !.'•  lo  merge  ihe 
subroutine,  lirsl  LO.\D  "TEN",  then  use  the 
command  ELST  "C:  or  LIST  "D:TEN".  Fhen 
LOAD  "DISPLAVLIS  I  "  and  use  the  direct  mode 
command  EN'EER  "C:  or  EN  PER  "D:  1  KN"  for 
cassette  or  disk  respectively.   Khen  delete  lines  100 
ibrough  I2(;.  and  replace  line  130  with  a  (;OSL'B 
32000.  Khen  RUN  as  usual.  For  a  detailed  expla- 
nation of  the  display  lists  and  the  meaning  of  ihe 


LETTER  PERFECT 

WORD  PROCESSING  FOR  THE*ATARI  -  800 


MAIN  -  MENU 

CURRENT  DRIVE 
NUMBER  #1 

-*■  Editor 

Change  Drive  # 

Load 

Save 

Merge 

Screen  Formal 

Printer 

LdcI( 

Unlock 

Delete 

Format  Disk 

Data  Base  Merge 

Quit 


EASY  TO  USE  :  LETTER  PERFECT  is  a  character  orientated  word  processor  with 
the  user  in  mind  The  program  (machine  language)  is  very  fast.  It  is  a  menu  driven  program 
thai  IS  very  easy  to  operate.  The  program  is  a  single  load  program  and  can  work  with  one  or 
more  disk  drives.  It  requires  a  minimum  ol  16K  ol  memory  and  a  single  disk  drive.  With  the 
Artari  825  printer  you  can  print  text  with  right  hand  justification.  You  may  also  use  diflerent 
Ivpe  fonts  (10  and  17  character  per  inch)  within  the  body  of  the  text  itself.  Boldface  is  printed 
as  expanded  print  font.  Underlining  can  be  done  as  well  as  sending  Escape  characters  within 
the  body  of  the  letter  itself.  All  theformats  are  a  default  but  you  can  change  them  all  to  desired 
values  If  vou  wisti  RiglH  t^argin.  lefi  margin,  top  of  form,  line  spacing,  etc.  are  easily  changed. 
Data  Base  Me  ge  works  with  the  sister  program  LETTER  PERFECT^DATA  BASE  MANAGER. 
User  may  use  this  program  to  create  mailing  lists,  and  completely  develop  your  own  data 
base  foi  your  personal  needs.  All  lexl  packed  before  storage  to  diskette  for  greater  storage 
capacity  Large  Buffer  alfows  you  to  pick  up  and  move  up  to  one  full  page  o(  screen  text  and 
move  It  to  any  location  m  the  text.  Merge  more  than  one  file  together  for  easy  editing.  Screen 
Format  allows  you  to  see  on  the  video  screen  exactly  how  the  text  will  appear  on  the  printer. 
Automatic  page  numbering,  headers  and  footers  are  easily  accomplished^  This  program  is 
easy  to  use  because  of  its  meaningful  and  easily  mastered  commands.  Fully  documented 
with  a  users  manual  that  explains  in  simple  language  how  to'  completely  use  ttie  program. 

All  this  and  more,  for  $149.95. 
Features: 


USE:  EPSON  MX-80 

and  ATARI  -825 

PRINTERS 


FULL  CURSOR  CONTROL 
Home  Cursor 
Scroll  Page  Forward 
Scroll  Page  Backward 
Pause  Scroll 
Scroll  Line  at  Time 
Scrolling  Speed  Control 
Move  Cursor  Down 
Beginning  or  Text 

MULTIFUNCTION  FORMAT  LINE 

Standard  Formats  a  Delaull 

Formats  Easily  Changed 

Righ'  Justification 

Leit  Margin 

Page  Widtli 

Line  Spacing 

Lines  Per  Page 

Form  Stop 

Set  Pages 

Top  Margin 

Bollom  Margin 

Delete  a  Character 
insert  a  Character 
Delete  a  Line 


insert  a  Line 

Headers  and  Footers 

Shin  Lock  and  Release 

Global  and  Local  Search 

and  Replacement 

Underlining  and  Baldlace 

Automatic  Centering 

Horizontal  Tabs 

Special  Print  Characters 

Split  Catalog 

Page  Numbering  up  to  65535 

Prints  up  to  255  Copies  ol 

Single  Text  File 

Non  Printing  Text  Commenting 

FUNCTIONS 
Delete  All  Text 
Delete  All  Alter  Cursor 
Delete  Alt  Before  Cursiir 
Delete  Next  Block 
Delete  Buffer 

Move  tMext  Block  lo  BuKer 
Add  Next  Block  to  Buffer 
Insert  Block  From  Buffer 
Merge  Text  Files 


[oppkz' 

This  program  atso  available  on  the  Apple  in  40/80  Video  (Super'R' 
Term.  Smarterm.  Videx.  Bit-3).  You  may  use  any  printer  type.  The 
Hays  Micromodem  II  can  be  used  to  send  files.  Can  be  Reconfi- 
gured at  any  time  to  use  different  printer.  80  column  board,  or 
standard  40  column  video.  Much,  Much,  More! 


mnwf^n-^ 


IM 


COMPUTER  BASED  SOFTWARE 


ENTERPRISES 


FREE  CONTROL  PAGE 

LJK  ENTERPRISES  INC.. 

P.O.  Box  10827 

St.  Louis,  MO  63129 

(314)846-6124 
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operation  codes,  I  suggest  thai  you  refer  to  IRIDIS 
#  1  by  The  Clode  Works. 

The  ilkislration  program  whicli  I  call  "SPRAY" 
(Table  4),  draws  colored  lines  ofdifferem  lengiii 
wliich  appear  to  rachate  (Vom  a  common  point  in 
the  center  of"  the  screen.  The  color  register  values 
used  were  arrived  at  by  experinieniation  witli 
"PALETTE"  and  seem  to  give  the  greatest  variety 
of  solid  colors.  The  colors  are  changed  randomly 
by  changing  the  values  of  color  register  2  (SETCO- 
LOR  2).  If  you  allow  the  program  to  run  long 
enough  for  the  attract  mode  to  be  invoked  by  the 
Operating  System,  then  ail  the  color  registers  will 
be  changed  automatically.  This  will  then  also 
change  the  background  color  and  lend  additional 
interest  to  the  patterns  foimetl. 

The  resolution  oi'C;RAPHlCS  modes  9,  10, 
and  1 1  {192v  X  80h)  is  a  departure  from  the  usual 
ATARI  practice  of  having  twice  as  many  pixels 
horizontally  as  vertically.  Howevei-,  that  very 
departure  from  the  "standard"  is  itself  an  additional 
advantage  in  that  it  provides  flexibility  in  what  can 
be  done  with  "direct"  graphics  modes.  One  does 
not  have  to  resort  to  "mixed-modes"  to  achieve 
special  effects.  "Mixed-Modes"  grapliics,  where 
one  custom-tailors  the  display  list,  line  by  line, 
allows  virtually  unlimited  flexibility  in  designing  a 
screen  formal,  but  I  would  not  recoirmiend  this  to 
the  novice.  However,  this  ready-made  subroutine 
approach  for  multiple  colored  and  dotted  lines  is 
simple  and  straightforward  and  should  further 
your  appreciation  of  that  wonderiul  and  ver.satile 
machine,  the  ATARI. 

TABLE  1.  Subroutine  TEN. 

32000  REM 

32001  REM 
320  02  REM 
32003  REM 
3200^  REM 
320  05  REM  ;  Create  C^R.B  Mode  displ^jy 

REM  :  list  without  text. 

GRAF'HICS  8-f.1.6 

REM 


*TEN*  3  Subroutine  to 

create  a  zinulated    GR.IO. 
Written  bij  Clyde  SF'encer  ♦ 


320  0  6 
32010 
32013 
3201'^ 
32  01^: 
32016 
32020 
32  023 
3202-4 
32025 
32030 
32033 
3203-4 
32035 
32036 
32040 
320-43 
32  0-4-^* 
320-45 
32050 
32060 
32063 


REM 
REM 
REM 

LET 

REM 

REM 

REM 

F'OKE 

REM 

REM 

REM 

REM 

F-'OKE 

REM 

REM 

REM 

FDR 


I  Locate  address  of  display 

:  li-it, 

DL=:PEEK  (560)  4.;-^tv6)KF'EEK  (  561 ) 


Turn 

559,0 


off  the  ANTIC  chip. 


;    F'lace    fiew    instruction 
;    codes    ifi    disp].3y    list. 
[)L+3,7'£!:F'DK£i:    DL  +  99,78 


op 


!    Eiegin    Ist 
INSERT==DL-*'6 

F'OKE    INSERT,  14 

REM 


insertion  loop. 
TO  DL+98 


32064  REM 

32  0  65  REM  I  Increnent  insertion  loop. 

32  070  NEXT  INSERT 

32073  REM 

3207-4  REM 

32075  REM  !  Eecjin  Znd  insertion  loop, 

32080  E C) R  INS E f H'  ===  D l.  + 1  0 2  TO  D I  -•■  J  9 F) 

32090  F'OKE  INSERT,  1-4 

32093  REM 

32  09-4  REM 

320  95  REM  :  Increnent  insertion  loop, 

3210  0  NEXT  INSERT 

32103  REM 

3210-4  REM 

32105  REM  :  X!KCh3nge  tiMing,*)!; 

32110  F-OKE:  87,10 

32113  REM 

32114  REM 

32115  REM  :  Turn  on  ANTIC  chip. 
32120  POKE  559,34 

32125  REM 
32130  RETURN 

TABLE  2.  PALETTE  Program. 


50 

51 

52 

53 

54 

95 

96 

100 

103 

104 

105 

110 

120 

130 

133 

134 

135 

140 

150 

160 

163 

164 

165 

170 

173 

174 

175 

ISO 

183 

184 

185 

190 

193 

194 

195 

200 

210 

213 

214 

215 

220 

223 


REM 

REM 

REM 

REM 

REM 

REM 

REM 
GOSl 
REM 
REM 
REM 
LET 
LET 
LET 
REM 
REM 
REM 


«F'ALETTE*  3  deMonstrjition  of 
Multiple  colors  in  GR.IO, 
Written  by  Clyde  Spencer. 


Go  to  subroutine 
siMulated  GR . 1 0 , 
J  320  0  0 


to  create 


Assign 
^1 

=  10 


register  vai iables 


Set 


color 
0  ,  A  ,  c: 

1 ,  B  ,  C 

2,C,C 


r  e  g  i  s  t  e  t^ 


;    Begi.n    drawing    1dof>s 
DATA^O    TO    15 


Set  color 
DATA 


vali.re . 


SETCOLGR 

SETCOLOR 

SETCOLOR 

REM 

REM 

REM 

FOR 

REM 

REM 

REM  : 

COLOR 

REM 

REM 

REM  : 

EOR 

REM 

REM 

R'EM  :  Draw  lines. 

F'LDT  0,  10*DATA+BAR 

DRAWTO  79,  10)kDATA+[:iAR 

REM 

REM 

REM  !  IncreMent  inner 

NEXT    BAR 

REM 


J     [iiegiri    inrier 
BAR=^10    TD    20 


drawing  loop 


drawing  loop. 
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DRAG    IS    BACK 

(by      Ted     Clawges) 

An  adven/ure  gome  to  test  your  logic  and  your  tendency 
towards  greed.   Battle  monsters,  werewolves,  vampires, 
speeding   demons,  the  croft/  Igor  and  of  course  ttie  Lord 
of  EWI.,.Orac.    How  much  gold  con  you    escope    with  ? 
How  much  will  you  spend  fo  stay  alive  ?  Your   insftncfs 
could    be   wrong,   fnon -scrolling).        ©1981 


24K       Atari  ^  800' 


cassette   on/y    $14.95 


SYNCRO,  INC.    SOfTWARi   DIVISION 

31331    VIA    COLIN  AS  VISA    AUD  HASTERCARD    ACCEPTEO 

SUITE   107  CALIF.    RESIDENTS  PLEASE  ADO  S% 

WESTLJIKE     VILLAGE.   CALIF.    8136!:  SALgS     TAX.     SI.OO     SHIPPINB. 


Software  for  the  Atarit 
MATH  FACTS     . 


A  series  o(  self-paced  instrLctionjI 
progTdms  fof  etefrienLary  school  child 
rea  The  programs  in  this  series 
aulomalically  advance  to  the  nejd 
unit  when  the  child  has  masiertd 
80^  of  the  work  generated  by  the 
computer.  The  previous  unit  will  be 
reviewed  if  the  child  cannot  master 
^%  of  the  work  in  a  particular  unit 
Each  unit  builds  on  the  skills  devel- 
oped sn  the  pfcviojs  unit 


MATH  FACTS  Level  III  51500 
(24K  BASIC,  grades  2  4)  High  reso 
lution  graphics  aid  the  child  in  learn- 
iny  howtocari^  cind  borrow.  Clnilsm 
this  le^ei  include;  addition  (3  number 
in  orke,  two  or  three  columns),  addi- 
tion [wAh  carry)  and  subtraction^ 
{with  boirow). 


f  MATH  FACTS  ■  Level  t ,  $  I  3.00 
( 16K  BASIC,  grades  K  2)  Concepts 
co^'efed  in  (has  level  are:  numbers 
number  placement,  number  words 
1 1-20).  addrtion  and  subtraction  (vi 
$ual  and  abstract). 


^ 


^ 


HATH  FACTS- Level  K  ..  S15.00 
124K  BASIC  grades  1  -3)  Thechild  is 
guided  graphically  throughout  this 
level  In  the  addition  and  subtraction 
units,  the  column  on  the  right  MUST 
be  added  or  subtracted  before  The 
cdumnontheleft  This^vel  includes: 
number  sequences  to  100,  greater 
than'less  than  ( 1-1 00).  addition  and 
subtraction  (2  and  3  columns). 


COM' POTATION/ 

TOMAL  EMCOtiMTER       5 1 5.00 
Two  memors-  building  programs  on 
one  cassette.  COM'PUTATlOM  is  a 
concentration'  game  for  two  players. 
/  ^Vatch  the  equation  behind  one  of 
■    the  boxes  with  the  answer  Of  an 
equal  equation-  Each  of  the  eight 
levels   of   play   helps   devdop  the 
child's  addition,  subtractiorx  multipti 
cation    or  division  skills.    TOfSAL 
Er^CCXlMTER  -  play  back  the  mel- 
ody that  the  computet  composes. 
Containiftvedilferent  skill  levels  and 
an  auto  rnode. 


^ 


^jol  593-4722  tor  C.O.D 


II  ^  I"  ^'i^f^  handiMi^ 
5' 00  Jot  COD 
'^ck  fes-flonis.  41.  |... 
*rite  For  Free  Ryi 


m 


AVATAR    SOFTWARE 


B 


"^  -UTILITY    PAK- 

HERE'S  i|  USEFUL  PROGRAHS  FOR  SERIOUS  DISK  USERS. 
'     DISK  CATALOG  LISTING     Shows  wHtRE  all  vou«  pRooBAns  r£S(de. 
Also  psepaaes  a  "fREt  SPACt"  RtpoHt  iHOuiKO  space  availablj  on 

YOUR    DISKS    AND    DOS    STATUS, 

•  PROCRAM  LISTING  UTILITY  Prints  mi   jiterpreteu  v,.«siok  of  your 
paoGRAK  ro  SHOW  keystroke  entries  reouihec  to  ent£r.  You  control 

COLUMN     hIDTM     OF     PRINTOUT.     ESPECIALLY     VALUABLE     FOR     Pk'OCRUM 
AUTHORS. 

•  XREF  UtILIIY  This  psughah  shows  all  your  BASIC  variables  anc 

the    lines    in    which    they    are   used,      EyEH   SMOMS    variables    HID!N6    11^ 

YOUR  phograh  that  aren't   IH  u^fc. 

•  TIKYSORI     HACHittE  Labsuace   Sort   subroutike   used  by  CATALOG  s 
XREF  PROORAis,     Can  sort  character   strihss  fob  aby  of  tour   BASIC 

PROGRAMS , 

1  PROGRAHS  ON  OISKETIt  =  120,00  , 


*  NEH  PROGRANS  AND  HARDtlARE  EVERY  MONTH   I  * 

WRITE     rOP    FIIEE     CATALOC     OF     SDFTWACI      an:;    MAROWAWE     how     available. 


'  -REAL    TIME  CLOCK- 

AVATAH   SOFTWARE    INTRODUCES  A  REAL    TIME   CLOCK   FOR    THE  ATARI    HHi. 

Plugs  into  the  right  castridge  slot.  Keeps  cohrect  time  even  when 

BEMOVED   FROM    THE    COMPUTER,      EaSY    TO   RE-SET    IF    NECESSARY.       F I VE 

year  battery  included,  use  ii  to  remikd  you  of  appq j nthents, 
Clock  can  be  used  in  real  time  applications,  even  xhith  another 

PBOGRAn   RUNNING.         W  I TH  ADO  I T 1 ONAL    HABDMARE,   YOUR   COMPUTER   CAN 
lURN    APPLIANCES    OH    AND    0?F, 

Diskette   included  huh  a   ihi.i   scheduling  program.     Pubchasebs  of 

THE     REAL     TIME     CLOCK     WILL     BE     MAILED     DOCUMENTATION     UPWADES 
PERIODICALLY. 

REAL  TI«E  CLOCK  I  DISKEIE  kith  documentation  ^  t69,SO        ^ 

- AVA BOARD - 

AI  LAST!   f-OB  A  BFASONABLE  PRICE,  YOU  CAN  TRANSFER  DBAKINQS, 

SCHEMATICS,  ETC.  FROM  PAPER  TO  YOUR  ATARI  AND  SAVE  THEM  ON  TAPE 

OR  DISK.  Unit  plugs  directly  into  game  ports.  Iocuhehtatioh  and 

A   PROGRAM   FOR    OPERATING    ARE    INCLUDED.       PlEASE    SPECIFY    TAPE    OR 
DISK, 

, PRICE  =  » 175, 00 J 


CHECK  or  M.O. 
Ca    res.  add  6.5%  tax 


NEW     LOCATION  ■ 

2096-A   Walsh  Ave.   Santa  Clara.  Ca.   9S050 


DEALER   inquiries 
Welcome 
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22''f 
225 
230 
233 
23-1 
235 
23A 
237 
2-^0 


Fv'F.M 

F^EM     ) 
NEXT 
REM 
F^-EM 

FilEM  ! 
REM  : 
REM    ! 


Ifjcr  eMGTit 
DATA 


outer     'ciatcs'     loop. 


liintEor    an    infinite    loop*    to 
keep    screen    fron    clearincj. 
Hit     'EiREAK'    kc^y    to    rerun. 


GOTO    2^0 


TABLE  3.  DISPLAYLIST  Program. 


50 

51 

52 

53 

5-^ 

55 

56 

95 

96 

100 

103 

10-1 

105 

110 

113 

ll--^ 

115 

116 

120 

123 

12^ 

125 

126 

130 

133 

13-4 

135 

136 

1-^0 

M3 

1-^^ 

145 

146 

150 

153 

154 

155 

156 

160 

163 

164 

165 

170 

173 

174 

175 

176 

180 

1B3 

184 

185 

190 

193 

194 

195 


«DISF-'LAYLIiin')K  A  pragraM  t( 
print  out  the  addresis;  and 
operation  codes  of  the  di? 
F>  lay  list. 
Written  by  Cl^^de  Spencer. 


Reset 
3  9  3  i  n 
100 


TRAP  and 
if  input 


ask  for  3:N 
is  not  nuM 


Ask    for    GRAF-'HICS    Models    0-40, 
"WHAT    GRAPHICS    MODE"? 


Ifiput 
V  s  1  i,.i  e 

mode: 


GFi:APHlC8    Mode    riuMSf-ic 


Set  GRAPHICS  Mode  and  cr 
new  display  li^iit. 
MODE 


re;:m  ; 

REM  ! 
REM  ; 
REM  ; 
REM  ; 
REM 
Ft  EM 
REM  ; 
REM  : 

TRAP 

REM 

REM 

REM  : 

PRINT 

REM 

REM 

REM  : 

REM  ; 

INPUT 

REM 

REM 

REM  ; 

REM  : 

CvRAPHIC 

REM 

REM 

RE!M  *  Locitte  starting 

REM  :  display  list, 

DISPLAYLIST==T:'EEK  (  56  0  )  ■•■PEEF<  (  561 

REM 

REM 

REM 

REM 

EOR 

REM 

REM 

REM 

REM 

LET 

REM 

REM 

REM 

LP R INT 

REM 

REM 

REM  :  Check  for  JUMP  op 

REM  !  of  displcsy  list), 

IE  PEEF<(  CONTENTS)  =^^65  THEN  GOTO 

REM 

REM 

REM  : 

NEXT 

REM 

REM 

REM 


PUT 
eric* 


e  it  t  e 


Begin  loop 
of  display 
0  TO 


to  11 
1  i  s  t , 
200 


address  of 

)«256 

st  cori  tents 


t  Assign  new  address  to 
;  variable  called  CONTENTS 
C0NTENTS=DISPLAYLIST+ADDRE 


£iS 


F-'  r  i  fi  t  a  d  d  r  e  Ji  s  <;!  n  d  o  p  c  o  d  e  =; . 
" , CONTENTS , PEEK ( CONTENTS ) 


c.'ode  (end 
2  0  0 


I  n  c  r  e  m  e  n  t    p  r  i  n  t  1  o  o  p 
ADDRESS 


Fvenenber  to  PDF'  the  stack  if 


196  REM 

197  REM 
20  0  END 


you  wii: 
e  1  s  e  , 


be  doing  a -ly thing 


TABLE  4.  SPRAY  Program. 


50 
51 

52 

53 

54 

95 

96 

100 

103 

104 

105 

106 

110 

113 

114 

115 

120 

130 

140 

143 

144 

145 

150 

153 

154 

1c;-  F- 

160 

170 
173 
174 
175 
180 
1B3 
184 
105 
19  0 
200 
203 
204 
2  05 
210 
213 
214 
215 
22  0 
223 
224 
225 
230 
233 
234 
235 
24  0 
243 
24  4 
245 
250 
253 
254 
255 
260 


REM 

REM 
REM 
REM 
REM 
REM 
REM  : 

GOSUEi 

REM 

REM 

REM  : 

REM  : 


)«SPRAY«  a  dertonstrat  Ion  of 
Multiple  colors  in  GR.IO. 
Written  by  Clyde  Spencer. 


Go  to  subroutine  to  create 
iMuIated  GR , 10 , 
320  0  0 


G e IT e r  £i t e  ra n d on  n i..i m b e t' 
between  3  and  5. 

LET  C-INTCRND(0)*3)+3 

REM 

REM 

REM  I  Set  color  registers. 


0  f  1  ,  8 
1,10,8 
2  ,  C  ,  8 


;  Set  quadrant  flag, 
SIGN=a 


:  Pick  randoM  X&Y  coordinates. 

X^-^^I:NT(RND(0)x40) 

Y-SIGN>KlNT  (  RND  (  0  )  )*96  ) 


SETCOLOR 

SETCOLOR 

SETCOLOR 

REM 

REM 

REM 

LET 

REM 

REM 

REM  :  E;:egin  nested  drawinq  loops. 

FOR  00=1  TO  2 

FOR  DATA=1  TO  15 

REM 

REM 

REM  {  Assigri  drawiiTg  coIot-. 

COLOR  DATA 

REM 

REM 

REM 

LET 

LET 

REM 

REM 

REM  }  F"  1  o t  c o lor' e d  ].  i tt e s; . 

PLOT  40-X,96-Y!DRAHTO  40-tX,96+Y 

REM 

REM 

REM  J  Increwent  color  loop. 

NEXT  DATA 

REM 

REM 

R  E!  M  *  Fi;  e  s  e  t  ti  u  a  d  r  a  n  t  f  1  a  c- , 

LET  SIGN^=^--1 

REM 

REM 

REM  ;  Increnent  syr^netry  J.oop. 

NEXT  00 

REM 

REM 

REM  ;  Pause 

FOR  DELAY=:1 

REM 

REM 

REM  :  Do  it 

GOTO  110 


to  appreciate. 

TO  1000  I  NEXT  DELAY 


a  1 1 
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ATARI 


OWNERS 
■TM       DEALERS 

PROGRAMMERS 

MASTER  MEMORY  MAP  —  Lists  almost  every  memory 
location  that  you  might  need  withi  examples  of  whiat 
to  poke  or  peek  and  what  results  necessary  for 
beginning  and  advanced  Atari  owners.  $5.95. 

TRICKY  TUTORIALTAPES  —  Do  your  programs  all  look 
alike?  This  series  of  self  teaching  tutorials  will  first 
show  you  what  your  machine  can  do,  then  take  you 
step  by  step  through  the  code  itself.  All  of  these 
"tricks"  can  easily  be  used  by  basic  or  advanced 
programmers.  Excellent  as  Dealer  Demos. 

TTTttI  —  DISPLAY  LISTS:  Break  up  your 
screen  into  3,  5,  even  10  different  modes 
of  graphics  and  text  at  the  same  time. 

TTT#2  —  HORIZONTAL/VERTICAL 
SCROLLING:  Ivlove  the  information  on  the 
screen  up,  down,  or  sideways. 
TTT#3  —  PAGE  FLIPPING:  Instantly 
display  a  new  screen  of  graphics  or  text 
by  the  press  of  a  button. 
TTTW4  —  BASICS  OF  ANIMATION:  For 
games  or  business  presentations, 
animated  figures  or  graphs  are  very  im- 
pressive. Similar  to  techniques  used  in 
star  raiders. TM 

TTT#5  —  LIGHT  PEN  PROGRAMS:  Some 
single  programs  for  use  with  the  new  light 
pen. 

Each  program  takes  a  few  hours  to  completely  learn, 
includes  full  documentation,  and  costs: 

$14.95  Tape  or  Disk!  Any  3  for  $39.95 

ORDER  TODAY  OR  SEND  FOR  OUR  COMPLETE  CATALOG 

SANTA  CRUZ  SOFTWARE 
5425  Jigger  Drive,  Soquel,  CA  95073 


^ 


This  is  an  attache  style  case  for  carrying  and  protecting  a 
complete  ATARI  computer  system.  It  will  hold  the  800  or  400 
computer,  disk  drive,  program  recorder  and  a  small  printer 
in  a  variety  of  combinations.  Constructed  of  the  highest 
quality  luggage  material.  Will  accommodate  equipment  in  a 
fully  operational  configuration  along  with  manuals,  working 
papers  and  disks.  Never  a  need  to  remove  equipment  from 
case.  Simply  remove  lid,  connect  power  and  operate. 

AT  301  Computer  case    S109.00 

AP  105  12"  Monitor  &  accessory  case        99.00 

P  402     825  Printer  case 89.00 

Cases  also  available  for  Apple,  Radio  Shack  and  peripherals. 
Ask  at  your  local  computer  store  or  order  directly. 

compuTer  case  company 

5650  INDIAN  MOUND  CT  COLUMBUS.  OHIO  43213  (614)  868-9464 


1 6  K  Memory  Board 

tin  plated  connector  tabs  (quantities  limited) 
gold  plated  connector  tabs 

32  K  Memory  Board 

gold  plated  connector  tabs 

•ATARI  is  a  trademark  of  Atari  Inc. 


Memory  Expansion  Boards 
for  the  ATARI* Computer 

Completely  compatible  with  ATARI 
hardware  and  software 

Mo  modifications  necessary 

Fully  assembled  and  tested 

User  installable  —  simply  plug  it  in 

One  year  warranty 


$59,95 

$89.95 

$179.95 

Dealer  Inquiries 

nvited 

Anderson  Peripherals,  Inc. 

777  South  Central  Expressway  Suite  1 00  •  P.O.  Box  629  •  Richardson,  Texas  75080  •  2 1 4-23 1  -6866 
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Assembler 

Joystick 

Driver 

James  E  Korenthal 
New  York,  NY 

Tired  of" coding  all  those  IF  slatcmcnts  lo  separate 
a  value  returned  by  the  STICK  function  into  its  X 
and  Y  componcntsr'  This  short  assembler  routine 
will  do  liie  trick,  and  give  you  faster  executing. 
more  readable  code  to  boot! 

In  order  lo  understand  haw  line  routine 
works,  we  have  to  look  at  \'alues  returned  by 
STICK  in  binary  notation: 


Direction 

Decimal 

Binary 

X-val 

Y-val 

(see 

be] 

ow) 

E 

W 

S    N 

none 

15 

1 

1    1 

1 

1 

N 

14 

1 

1    0 

1 

() 

NE 

G 

0 

1     0 

2 

0 

E 

7 

0 

1   I 

2 

t 

SE 

5 

0 

0    1 

2 

2 

S 

13 

1 

0    1 

1 

2 

sw 

9 

1 

0 

0    1 

0 

2 

w 

11 

1 

0 

1  1 

0 

1 

NW 

10 

1 

0 

1    0 

0 

0 

A  glance  at  this  table  reveals  dial  eacli  direclion 
is  liandled  by  one  bit,  with  a  zero  value  intlicating 
that  the  joystick  is  pointed  in  that  direction.  The  "E 
W  S  N"  subheading  in  the  binary  coliunn  indicates 
the  bit-direction  correspondence.  P"or  e.xaniple,  a 
value  of  9  is  1001  in  binary,  with  O's  in  (he  bits  corre- 
sponding to  south  and  west. 

Now,  how  can  we  make  use  of  this  inlorniation? 
We  can  split  up  the  east-west  and  north-south 
grou[)s  of  two  bits,  and  transform  ihem  into  dclta-x 
("change  in  x")  and  della-y  values.  Here's  the  as- 
sembler program: 


STICKO 

=    $0278 

;add  ress  of  jo  ystic  k  0  val  u 

ANSLO 

=    SD4 

;low  byte  of  answer 

AN.SHI 

=    SD5 

;high  byte  of  answer 

*    — 

S0600 

;dumniy  origin(code  is 
relucalable) 

PLA 

;di!<card  number  of  argu- 
ments 

PLA 

;di<<card  high  byteof 
stick  number 

PLA 

;j;i>l  stitk  niimbi-r  (0-3) 

TAX 

;u.se  it  as  an  index 

PLA 

;discard  high  byteof 
direction 

LDA 

STICKO.X 

;get  value  for  appropri- 
ate direction 

PLP 

:^et  direction  indicator 
in  carry 

BCS 

STICKY 

;does  be  want  x(0)or 

y(i»? 

LSR 

A 

;he  wants  X, so  shift  down 
2  bytes 

STICKY 


SAVEIT 


LSR  A 

AND  #3 

SEC 

SBC  #2 

BPL  SAVEIT 

LDA  #2 

STA  ANSLO 

LDA  #0 

STA  ANSHI 

RTS 

•END 


;Riask  off  liigh  bits 
;sel  carry  for  subtract 
;change  2  Ki  0. 3  lo  1. 1  to-I 
;wasil  1? 

Uransfornt  to  2  if  so 
;save  low  li\te  of  result 
:zapliigb  liyle 

;all  done 


Given  a  joysiick  tuimber  (0-3)  and  a  direction  (0 
for  X  or  horizontal  or  east-west  and  1  for  Y  or 
vertical  or  iiorlli-south),  this  routine  reiiirns,  for 
the  correct  joystick,  a  value  shown  tlie  X-val  or  Y- 
val  column  of  our  table.  You  should  verify  that 
subtracting  one  from  tlie.se  values  yields  approp- 
riate deltas  (-1,  0.  or  I)  for  .screen  positions.  If 
standard  deltas  are  desired  for  the  y-axis,  reverse 
the  value  (subtract  it  from  one  instead  of  the  other 
way  around). 

The  following  demonstration  program  shows 
how  to  incorporate  the  joystick  driver  into  your 
own  basic;  programs.  It  simply  monitors  the 
status  of  all  four  joysticks,  displaying  standard 
deltas  in  x,y  format; 

10   REM  Atari  800  Joystick  Driver  Demonstration 

Profjram 
20   REIVI  James  E.  Korenthal,  1981 
30  GOSUB  1000  :REM  load  machine  language  code 
40  X  =  0  :  Y  =  I  :REM  direction  codes  (for  read- 
ability) 
50   POKE  201.8  :REM  use  narrow  columns 
60   FOR  NSTICK  =  0  to  3  :REM  loop  on  all  three 

sticks 
70    DELTAX  =  USR(JOY,NSTICK,X)- 1  ;  REM  get 

horizontal  change 
80   DELTAY  =  I-USR(JOY,NSTICK.V)  :REM  get 

vertical  change 
90  PRINT  DELTAX;",";DELTAY,  :REM  print 
values 
100   NEXT  NSTICK  :REM  end  loop  on  slicks  0-3 
no    PRINT  :REM  skip  to  next  line 
120   GOTO  60  :REM  loop  until  break  or  reset  is 
pressed 
1000   REM  subroutine  to  load  joystick  driver  machine 

code 
1010   DIM  JOY$(29)  :  JOY  =  ADR(JOY$)  :REM  set  up 

code  &  pointer 
1020   FOR  J  =  JOY  to  JOY  H- 28  :REM  read  and  store 

29  bytes 
1030   READ  BYTE  ;  POKE  J.BYTE  :  NEXTJ  : 

RETURN 
1040   REM  machine  code  goes  here: 
1050   DATA  104,104,104,170,104,189,120,2,40,176,2, 
74.74,41 

1060   DATA  3,56,233,2,16,2,169,2,133,212,169,0,133, 
213,96 

As  an  iuleresting  exercise,  try  incoiporaling 
the  joystick  driver  into  Larrv  Isaacs'  speed-up  of 
Chris  Crawford's  Plavcr-Missile  Demo  ([.isdiig  'J 
on  page  KI.S,  COMPUTE!  \ol.  3,  No.  4).  Make  sure 
you  allow  the  ship  to  move  in  all  tlireclioiis  (as  is, 
llie  progratn  onl\  allows  north,  .south,  easl.  or 
west),  and  watch  out  for  that  RESTORK  in  line 
I140:  © 
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Atari  800: 

Assembly  Language 
Routine  To  Eliminate 
DOS/FMS  When  They 
Are  No  Longer  Needed 

John  Elliott 
New  York  NY 

As  all  users  of  VERSION  I  of  DOS  will  know, 
about  9K  of  RAM  is  taken  up  by  the  DOS/FMS 
routines.  More  than  4K  of  this  RAM  is  needed  only 
when  vou  want  to  talk  directly  to  DOS  through  the 
menu  selection  screen. 

The  DOS  REFERENCE  MANUAL  describes 
a  method  (1)  of  releasing  the  RAM  used  for  these 
functions.  However,  the  BASIC  program  listed  in 
the  manual  will  run  only  when  the  BASIC  cartridge 
is  inserted.  This  presents  a  problem  for  those  of  us 
who  are  using  the  ASSEMBLER/EDITOR  car- 
tridge. How  can  we  get  the  same  RAM  .savings  as 
our  BASIC  counterparts?  By  using  assembler,  of 
course! 

The  short  assembly  language  program  listed 
here  will  eliminate  DOS  and  FMS  when  either  the 
BASIC  or  ASSEMBLER/EDI  FOR  cartridge  is  in- 
serted. You  can  still  use  all  the  DOS  functions  that 
are  controllable  with  BASIC  and  the  ASSEMBLER 
/EDITOR  keywords. 

The  routine  is  designed  to  l^e  as  general- 
pin*pose  as  ]30ssible,  so  I  will  describe  an  operational 
procedure  which  is  independent  of  the  cartridge 
being  used.  In  fact,  once  the  program  is  saved  on 
diskette,  it  can  be  executed  with  no  cartridge 
inserted. 

Saving  The  Program  To  Diskette 

Our  first  task  is  to  get  the  object  program  into 
RAM.  If  you  have  the  ASSEMBLER/EDITOR 
cartridge,  use  it  to  a.ssemhle  the  program,  with  the 
object  program  going  lo  RAM  (this  is  the  assembler 
defaidt).  If  you  do  not  have  the  ASSEMBLER/ 
EDFFOR  cartridge,  but  you  want  to  make  use  of 
the  program,  then  you  can  use  BASIC  lo  POKE 
the  program  into  RAM. 

Oin-  next  task  is  to  save  the  object  program  on 
diskette.  Cio  to  the  DOS  menu  selet  lion,  by  typing 
DOS  (RETURN).  Fhen  follow  the  "BINARY 
SAVE"  procechne  described  in  the  DOS  manual 
(2).  The  session  should  ]jioceed  as  follows: 

SELECT  ITEM 

K  (RETURN) 

SAVE— GIVE  FILE,  START,  END 

DISOUT.  OBJ,  600,  626  (RETURN) 

SELECT  ITEM 


This  SELECT  ITEM  prompt  indicates  that 
the  program  has  been  saved.  Note  that  the  file 
name  is  arbitrary. 

Executing  The  Program 

Now  that  we  have  the  permanent  copy  on  disk,  we 
can  load  it  into  RAM  and  use  it  as  and  when  we 
need  it.  To  load  it  into  RANL  go  to  the  DOS  menu 
selection,  by  tvping  DOS  (RETURN).  Then  follow 
the  -'BINARY  LOAD  "  procedure  described  in  the 
DOS  manual  (3).  The  session  should  proceed  as 
follows: 

SELECT  ITEM 

L  (RETURN) 

LOAD  FROM  WHAT  FILE? 

DOSOUT.  OBJ  (RETURN) 

SELECT  ITEM 

This  SELECT"  ITEM  prompt  indicates  that 
the  prtjgrani  has  been  loaded  into  RAM.  To 
execute  it,  follow  the  "RUN  AT  ADDRESS"  proce- 
dure described  in  the  DOS  manual  (4).  The  session 
should  proceed  as  follows: 

SELECT  ITEM 

M  (RETURN) 

RUN  FROM  WHAT  ADDRESS? 

600  (RETURN) 

READY/EDIT 

I  he  computer  will  respond  with  either  READY 
or  EDIT,  depending  on  whether  you  have  the 
BASIC  or  the  ASSEMBLER/EDITOR  cartridge 
inserted.  DOS  8c  FMS  have  now  been  eliminated. 

I  hope  you  find  this  routine  useful.  If  you  find 
that  you  rarely  use  DOS  directly,  you  may  like  to 
make  use  of  the  AUTO.  SYS  feature  to  automate 
the  routine.  Good  luck! 

Notes  On  The  Listing 

Fhe  jirogram  follows  fairly  closely  the  steps  taken 
by  the  BASK:  program  listed  in  the  DOS  manual 
( i).  You  may  find  it  interesting  to  compare  the  two. 

Lines  140-160  :  Define  the  origin  and  initialize  the  stack 

pointer. 

Lines  170-280  :  .\d\uM  DOS/OS  vectors. 

Line  290  :  Link  to  1K)S. 

Lines  300-320  :  Jump  lo  (he  cartridge  initialization 

ixniline. 

I  have  used  P.VGE  6  to  hold  the  object  program. 
However,  the  routine  is  rekjcatable,  ,so  you  may 
locate  it  somewhere  else  in  RAM  if  you  need 
locations  $600-,f;(326  for  some  other  purpose. 

As  the  comment  at  line  1 20  states,  eliminating 
DOS  &  FMS  releases  5200  bytes  of  RAM.  The  DOS 
REFERRNC:E  MANUAL  (1)  states  thai  the  5384 
byles  of  RAM  are  released,  bui  this  includes  the 
length  of  the  BASIC  routine  —  184  bytes. 

RefiTi'ticcs. 

(1)  ATARI  DISK  OPERATING  SYSTEM 

REFERENCE  MANUAL,  0015200  rev.  l, 
appendix  C:.3,  page  ,58. 

(2)  Ibid.  Page  36. 

(3)  Ibid.  Page  38. 
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(4)  Ibid.  Page  38. 
LOC  OBJECT   LINE  SOURCE  STATEMENT 


0000 
0600 
0602 
0603 
0605 
0  60  7 
0609 
O&OB 
060O 
060F 
0611 
0613 
0615 
0618 
061A 
061D 
0  62  0 
0622 
0  62  4 
0627 


A2FF 

9A 

A923 

850A 

A9F2 

850B 

A988 

850C 

A907 

850D 

A930 

8D0CQ7 

A912 

8D0D07 

208807 

A900 

8508 

6CFABF 


C'lOD 
0110 
0120 
0130 
0140 
U150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 


;routine  to 
;  DOS  & 
;releases  5 


LDX 
TXS 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JSR 
LDA 
STA 
JMP 
.END 


ELIMINATE 
FMS 
200  BYTES 

$600 
fl$FF 

#$23 

SOA 

#$F2 

iOB 

tt$88 

SOC 

»J07 

JOD 

t«$30 

$7QC 

»S12 

i70D 

$788 

ftSOO 

$08 

CSBFFA) 


© 


. .  .'!^ .  ?^.?A?. . .  ATA  R  r!.  .p?oWa ^.S . . . . 

TH RE E -B AS E  "  C A LC UL ATOR     '-"  $  1 2.95 

Hexodecimol,   Decimal,  Ocral.     Reverse   Polish 

AUDIBLE    DISASSEMBLER         -        $9.95 

op-code  generates   a  'one       Decimal      Hexadecimal. 

DECISION    MAKER    -  $8.95 

Aids  in  evaluation   o(   complex    decisions. 


1  r 


Color 

Computer 
I      Concepts 


ATARI  is  o  trademark  of 
ATARI,  INC. 

P.O.  BOX  1206 
KENT,  WA  98031 


FILE  ■  IT  2 

An  upanded  database  sjrslem 
by  JERRY  WHITE 

This  expanded  version  of  FILE-IT  'provides 
the  following  additional  capabilities.  User 
controlled  data  selection  for  creating 
subfiles  from  mam  data  files.  Random 
access  file  updating  for  label  and  financial 
data  files.  Financial  entry  and  report  generator  programs  to  provide  entry  and 
lormatted  output  of  accounting  or  other  financial  information.  Usei  generated  codes 
provide  for  data  selection  by  co(Je(s)  and/or  date(s).  Monthly  bar  graph  program 
generates  usual  pictures  of  selected  data  on  screen  or  printer. 
Requires  1  disk  drive,  minimum  of  24K  RAM.  and  an  80  column  printer.  Supports 
single  or  multiple  disk  drives.  Includes  detailed  documentation,  use/'s  manual  and 
utility  programs.  $49.95 

To  Order  (send  check  or  money  order)  or  for  Information  write: 

swim  SOFTWARE,  INC.  P.O.  BOX  641  •  MELVIUE,  N.Y.  11747  •  1516]  549-9141 

Atari®  (s  a  trademark  of  Atari,  Inc.  N.Y.  RESIDENTS  ADD  7%  SALES  TAX 


Atari  Data 

Robert  W.  Baker 
Atco,  NJ 

While  recently  converting  a  simple  program  from 
the  PET  to  run  on  the  Atari,  I  came  across  a  few 
new  quirks  in  Atari  BASIC  that  I  believe  have  not 
yet  been  documented.  The  problems  Iiave  to  do 
with  using  strings  in  DATA  statements  on  the 
Atari,  There  is  a  vast  difference  in  the  '.va>'s  Micro- 
soft and  Atari  handle  this. 

It  appears  that  Atari  uses  commas  to  separate 
DATA  elements  regardless  of  where  they  appear. 
Even  if  a  string  is  enclosed  in  quotes,  commas  are 
still  recognized  and  create  separate  data  elements. 
Adding  quotes  actually  creates  another  problem 
since  they  are  not  optional.  Any  quotes  in  the 
DATA  statement  will  actually  be  read  as  part  of  the 
string  data.  Here's  a  simple  program  that  will 
quickly  illustrate  how  the  DATA  statement  works 
on  the  Atari: 

10  TRAP  70 

20  DIMA$(40) 

30  DATA  "TEST,  WITH,  COMMAS'* 

40  READA$ 

50  PRINT  A$ 

60  GOTO  40  • 

70  END 

When  you  run  this  program  you'll  see: 
"TEST 
WITH 
COMMAS" 

These  three  lines  show  that  the  commas  are 
still  recognized  and  actually  create  three  separate 
data  elements  instead  of  one.  Also,  notice  that  the 
quotes  are  still  part  of  the  data  as  are  the  spaces 
after  the  commas.  Thus,  whenever  placing  strings 
within  DATA  statements  on  the  Atari,  vou  cannot 
have  commas  as  part  of  the  data.  Also,  (here's  no 
real  reason  to  use  quotes  unless  they'ix  actually 
wanted  in  the  data.  You  do  not  need  quotes  at  all, 
even  when  there  are  spaces  within  the  string 
constant. 

While  I'm  at  it,  here's  a  copy  of  the  program  I 
converted  for  the  Atari.  It's  a  program  that  I  use  to 
record  birthdays,  anniversaries,  and  other  impor- 
tant dates.  The  program  allows  you  to  display  or 
print  the  recorded  dates  for  any  month,  or  the 
entire  list.  It  has  an  option  to  supress  special  dates 
unless  specifically  lequestcd. 

The  information  for  any  date  is  stored  in 
separate  DATA  statements.  The  first  five  characters 
are  the  actual  date  in  the  form  of  "MM/DD".  This 
is  followed  by  two  spaces  and  any  specific  data 
associated  with  that  date.  Special  dates  are  identified 
by  an  asterisk  as  tlic  first  character  in  the  data  for 
that  date  (see  program  line  lOOU).  The  last  DATA 
entry  must  be  the  word  "END"  to  terminate  the  list 
correctly. 
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For  convenience,  1  normally  use  a  separate 
line  for  each  DATA  statement  constructed  from 
the  date  itself.  This  makes  the  line  very  easy  to 
locate  and  avoids  duplication.  Typically  I  make  the 
month  the  thousands  digits  (1000-12000)  and  the 
day  of  the  month  the  hundreds  and  tens  digits 
(010-310).  This  leaves  the  ones  digits  for  multiple 
events  on  the  same  date,  up  to  10  maximum  of 
course. 

Data  recorded  in  the  program  is  not  sorted  or 
re-ordered  in  any  way.  Dates  are  listed  in  the  exact 
Older  found  in  reading  the  DATA  statements,  so 
they  should  be  stored  in  the  correct  order.  When- 
ever you  update  the  program  remember  to  save  a 
new  copy.  For  added  convenience,  you  may  want 
to  also  include  the  date  of  the  last  update  as  well 
(see  program  line  50).  Just  remember  to  avoid 
using  commas  in  the  data  strings  as  discussed  earlier! 

10  REM -i 

20  f?En  DATE  BOOK  -  FOR  ATARI 

30  REM  B*v'^  ROBERT  BAKER 

40  REM 

50  REM  LAST  UPDATE^  rft-'DDAY 
60  REM 

65  OPEN  #L4.0."K" 

£7   DIM  R$(40>.tt*<:2) 

70  PRINT  ai?$C125>j":m  DATE  BOOK  W^  IM 

PORT  ANT  DATES  tU" 

80  PRINT   =  PRINT 

98  PRINT  "DISPLAY  rtONTH" 

95  PRINT  "(1-12.  A=ALL.  S=SPCL>"; 

100  I^PUT  M$=IF  m=""  TJEN  800 

195  IF  M$<"A"  THEN  H=UAL<M$) 

110  IF  r»="A"  OR  M$="S"  THEN  200 

120  IF  M<1  OR  n>12  THEN  800 

200  PRINT   = PRINT 

210  P=8^ PRINT  "UANT  PRINTED  COPY  CY/N)"; 

220  IhPUT  RI=IF  R$="Y"  TF€N  P=l 

300  PRINT  CHR*C125);  :RESTO(^   =L=0 

310  READ  R$ 

320  IF  RS="E}€"  THEN  GOSUB  989^  GOTO  78 

330  IF  R$(8.8X>":|:"  TfEN  486 

348  IF  m="S"  THBI  PRim  R$-L=L+MF  P=l 

THEN  LPRINT  RS 
350  GOTO  500 

400  IF  M$="A"  OR  UAL(R*(1.2)>=M  THEN  PRI 
NT  RI^L=L+MF  P=l  THEN  LPRINT  R$ 
500  IF  L=20  Ti€N  GCeUB  908  =  L=0 
510  GOTO  310 
800  aOSE  #1^EN0 

900  PRINT  =  PRINT  "PRESS  A^'  KE^'  TO  CONTI 
NUE"; 
qofl  Q£y  #1^X 

950  PRINT  CHR$<125^;  =RETLI?N 

1000  DATA  01.-^01   m^  OEss  ma 

12250  DATA  12/25  JANE  DOE  (1925) 

12300  DATA  12/30  m  TWO  (1959:' 

32980  DATA  END  t 
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Memory 
Protection 
For  Atari 


Jim  Clark 
Seattle,  WA 

A  problem  arises  in  applicaUuiis 

which  require  that  a  portion  of 

memor)'  be  protected  from 

BASIC  on  the  Atari  Computer, 

For  example,  most  assembly 

language  subroutines  need 

protection.  The  problem  is  that 

BASIC  is  likely  to  use  memory 

anywhere  within  available  RAM, 

thus  writing  over  tite  assembly 

language  subroutine  and  de- 
stroying it. 

In  many  compiuers  it  is 

possible  to  protect  memory  at  the 

"high"  end,  i.e.,  at  the  highest 

RAM  address.  The  Atari  uses 

high  memory  for  the  data  which 

is  displayed  on  the  screen.  If  you 

attempt  to  protect  memory  above 

the  screen  display  by  re- 
ducing the  high  memory  value 

that  BASIC  thinks  it  has,  then 
you  cannot  clear  the  screen  or 
scroll  text  in  any  of  the  splii -screen 
modes  because  these  actions 
affect  memory  beyond  the  screen 
display  area.  These  actions  cause 
no  problem  wlicn  the  screen  display  is  actually  the 
last  thing  in  memory,  becau.se  they  apply  to  nonex- 
istent memory.  However,  if  you  warn  to  use  memory 
beyond  the  screen  display  ibr  your  own  purposes, 
then  your  data  will  be  damaged  by  any  action  in 
your  program  which  clears  the  screen  or  .scrolls 
text  in  a  text  window. 

Another  alternative  is  to  protect  low  memory. 
The  main  problem  with  this  a|)]>roarh  is  (hat  tlie 
memory  protection  must  be  done  before  BASIC 
gets  control,  since  BASIC  starts  saving  any  program 
you  enter  !:iegimiing  at  the  low  meniorv  address. 
The  program  shown  here  solves  this  problem  as 
follows:  it  takes  control  of  the  Atari  in  an  assembly 
language  subroutine  and  resets  the  system's  low 
memory  pointer.  It  then  reinitializes  BASIC — ju.st 
as  if  you  had  pressed  the  SYSTKM  RF.SET  key  — 
and  BASIC  takes  control  again,  blissfuilv  unaware 
that  it  now  has  less  R.4M  to  work  w  ith  than  it  did 
before  you  ran  this  program. 


10  REM  MEMPROT.BAS  | 

20  REM  by  Jim  Clark 

30  REM  2415  East  McGraw  St. 

40  REM  Seattle,  WA  98112 

100  REM  Load  assembly  language  subroutine 

110  PGMSIZ=24:DIM  SUBR$ (PGMSIZ) 

120  FOR  1=1  TO  PGMSIZ 

130  READ  BYTE 

140  SUBR$(I)=CHR$(BYTE) 

150  NEXT  I 

200  REM  Get  amount  of  memory  to  protect 

210  PRINT  "How  many  bytes  do  you  want  to  protect"; 

220  INPUT  PROTECT 

230  HI=INT (PROTECT/256) : LOW=PROTECT-256*HI 

24  0  SUBR$(6,6)=CHR$(LOW) 

250  SUBR$(14,14)=CHR${HI) 

300  REM  Reinitialize  BASIC  with  the  new  low  meiTory  pointer 

310  Z=USR(ADR{SUBR$}) 

400  REM  Assembly  language  subroutine 

410  REM  MEMLO  =$02E7  ; BOTTOM  OF  AVAILABLE  USER  MEMORY 

420  REM  WARMST=$08    ;WARM  START  FLAG 

430  REM  CARTA  =$AO0O  ;BASIC  CARTRIDGE  ENTRY  POINT 

440  REM 

450  REM  ,-THE  PROGRAM  IS  COMPLETELY  RELOCATABLE, 

46  0  REM  ;S0  NO  STARTING  ADDRESS  IS  PROVIDED 

470  REM 

500  REM  CLC  ? INITIALIZE  FOR  ADDITION 

510  DATA  24 

520  REM  LDA  MEMLO 

530  DATA  173,231,2 

540  REM  ADC  #PROTECT&$FF 

550  DATA  105,0 

56  0  REM  STA  MEMLO 

570  DATA  141,231,2 

580  REM  LDA  MEMLO+l 

590  DATA  173,232,2 

6  00  REM  ADC  #PROTECT/256 

610  DATA  105,0 

6  20  REM  STA  MEMLO+1 

630  DATA  141,232,2 

6  40  REM  LDA  #0 

6  50  DATA  169,0 

660  REM  STA  WARMST 

670  DATA  133,8 

680  REM  JMP  CARTA 

690  DATA  76,0,160 

999  END 


;ADD  LEAST-SIGNIFICANT  BYTES 


;ADD  MOST-SIGNIFICANT  BYTES 


r RESET  THE  WARM  START  ^LAG 


; START  BASIC  OVER  AGAIN 


To  find  the  address  of  the  nieinor)  vou  liave 
protected,  type  ?PKF.K(743)-I-  25(r'^Pi:kK(744) 
before  you  run  this  program.  The  numbei-  printed 
can  be  u.sed  as  the  origin  ibr  an  assembly  language 
subroutine,  or  as  the  destination  address  for 
whatever  data  you  want  to  store  in  the  protected 
area. 

When  you  run  llie  program,  it  asks  how  inut  li 
memory  you  watu  to  jjrolect.  Type  in  any  positive 
number  which  is  less  than  the  amount  of  RAM  vou 
have  available,  as  determined  by  typing  ?FRE(0). 
The  program  reinitializes  BASIC,  and  if  you  type 
?PEF.K(743)  +  236*FEFK(744)  again,  the  number 
printed  will  be  greater  than  the  value  shown  before 
rimning  the  program:  the  difTeience  is  the  amount 
yoti  tequestcd  to  be  protected.  I  he  meinorv  area 
will  remain  protected  until  you  turn  iht  com]niter 
off.  aiul  the  area  can  be  used  for  a.ssemlil)'  language 
subroutines,  redefined  character  .sets,  player-mi.ssile 
graphic  objects,  or  any  other  use  you  might  wish.  © 
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SOFTWARE  FOR  THE  ATARI  800 
AND  THE  ATARI  400* 


TAHI  TREK  " 

By  Fabio  Ehrengruber 

Gel  ready  for  an  exciting  Irek  through  space.  Your 
mission  IS  to  rid  llie  galaxy  of  Kllngon  warships,  and  to 
accomplish  Ihis  you  must  use  strategy  to  guide  the  star- 
ship  Enterprise  around  stars,  through  space  storms,  and 
amidst  enemy  (ire.  Sound  and  color  enliven  this  action- 
packed  version  ol  the  traditional  Irek  game.  Nine  levels  of 
play  allow  the  player  to  make  the  mission  as  easy  or  as 
challenging  as  he  wishes.  At  the  highest  leuel  you  are  also 
playing  against  time  Damage  lo  your  ship  can  be 
repaired  in  space  at  a  cost  of  time  and  resources  if  you 
can'l  make  it  back  to  base.  TARI  TREK  gives  you  a  lot  ol 
trek  at  a  low  price  This  program  is  written  entirely  in 
BASIC  and  requires  at  least  2'IK  of  user  memory.  For  the 
Atari  800  only. 

Cassette- {11.95        Diskette  -  JH.35 


FASTGAMMON'" 

By  Bob  Christiansen 

Play  bacligammon  against  a  talented  computer  oppo- 
nent T  his  IS  the  latest  and  best  version  of  the  most  popu 
backBammon-playmg  program  for  personal  computers  ■ 
FASTGAMMON.  Roll  your  own  dice  or  let  the  computer  roll 
them  for  you.  Adjust  the  display  speed  to  be  fast  or  slow. 
If  you  wisNyou  can  play  a  game  usingthesamedice rolls 
as  the  previous  game  -  a  greataid  in  improvingyour  skills 
at  backgammon.  Beginners  find  it  easy  to  learn  backgam- 
mon by  playing  against  the  computer,  and  even  very 
good  players  find  it  a  challenge  to  beat  FASTGAMMON, 
The  12-page  instruction  booklet  includes  the  rules  of  the 
game.  Written  in  machine  language.  Requires  only  8K  of 
RAM  and  runs  on  both  the  Atari  400  and  the  Atari  800. 

On  cassette  only  -  J19.95 


TANK  TRAP 

By  Don  Ursem 

A  rampaging  tank  tries  to  run  you  down.  You  are  a  combat 
engineer,  building  concrete  barriers  in  an  effort  to  con- 
tain the  lank-  Use  either  the  keyboard  or  anAtan  joystick 
to  move  your  man  and  build  walls-  If  you  trap  the  tank  you 
will  be  awarded  a  rank  based  on  the  amount  of  time  and 
concrete  you  used  up  Butlheyll  be  playing  taps  for  you 
if  you  get  run  over.  There  are  four  levels  of  play.  Higher 
levels  of  play  introduce  slow  curing  concrete,  citiiens  to 
protect,  and  the  ability  of  the  tank  to  shoot  through  any 
wall  lintess  you  stay  close  by.  Music,  color,  and  sound  ef- 
fects add  to  the  excitement.  Written  m  BASIC  with  ma- 
chine lanouage  subroutines- Requires  at  least  16K  of  user 
memory.  Runs  on  the  Atari  800  and  on  an  Atari  400  with 
16K  RAM. 

Cassette  -  Jll.95       Diskette  •  J14,95 


OS  FORTH"  By  James  Albanese  Step  into  the  world  of  the  remarkable  FORTH  programming  language-Wrilingprogramsin  FORTH  is  much  easierthan  writingthem  inas- 
sembly  language  yet  FORTH  programs  run  almost  as  fast  as  machine  codeand  many  times  faster  than  toe  programs.  QS  FORTH  IS  based  on  lig-FORTH,  the  jwpular  mo^^^^ 
from  the  FORTH  Interest  Group  that  has  become  a  standard  for  microcomputers.  (}S  FORTH  is  a  disk-based  system  that  can  be  used  with  upto  four  disk  drives.  There  are  five 
modules  included: 

1   The  FORTH  KERNEL  (The  standard  fig  FORTH  model  customized  to  run  on  the  Atari  computer). 

2.  An  EXTENSION  lo  the  basic  vocabulary  that  contains  some  handy  additional  words 

3.  An  EDITOR  that  allows  editing  souice  programs  (screens)  using  Alan  type  editing. 

4  An  lOCB  module  that  makes  1/0  operations  easy  to  set  up. 

5  An  ASSEMBLER  that  allows  defining  FORTH  words  as  a  series  of  6502  assembly  language  instructions. 

Modules  2-5  may  not  have  to  be  loaded  with  the  user's  application  program,  allowing  for  someefficiencies  in  program  overhead-  Fullerrorslalements(no(  just  numerical 
codes)  are  pnnted  out.  including  most  disk  error  statements.  QS  FORTH  requires  at  least  24K  of  RAM  and  at  least  one  disk  drive.  For  the  Atari  800  only- 

On  diskette  only  ■  $79.95 
********* 

ASSEMBLER  by  Gary  Shannon.  Write  your  own  6502  machine  language  programs  witli  this  inexpensive  in-RAM  editor/assembler.  Use  the  editor  to  create  and  edit  your 
assembler  source  code  Then  use  the  assembler  to  translate  the  source  code  into  machine  language  instructions  and  store  the  code  in  memory,  bimplecommarids  allow  you 
to  save  and  load  Ihe  source  code  lo  and  from  cassette  tape  Vou  can  also  saveany  part  of  memory  on  tape  and  load  it  back  into  RAM  at  the  same  or  at  a  different  ocation,  I  he 
assembler  handles  all  6502  mnemonics  plus  12  pseudo-ops  that  include  video  and  printer  control.  Commenting  is  allowed  and  error  checking  is  performed  A  very  usetui 
feature  allows  you  to  view  and  modify  hexadecimal  code  anywhere  in  memory.  Instructions  on  how  lo  interface  machine  language  subroutines  to  your  HftblL  programs  are 
included.  ASSEMBLER  requires  16K  of  user  memory  and  runs  on  both  the  Atari  800  and  the  Atari  400, 

On  cassette  only  -  S74.95 
********* 

6502  DISASSEMBLER  by  Bob  Pierce  This  neat  8K  BASIC  program  allows  you  to  disassemble  machine  code,  translating  it  and  listing  it  in  assembly  language  format  on 
the  video  and  on  the  printer  if  you  have  one,  6502  DISASSEMBLER  can  be  used  lo  disassemblethe  operating  system  ROM. the  SASICcartridge  and  machine  language  pro- 
grams located  anywhere  m  RAM  except  where  the  DISASSEMBLER  itself  resides.  (Most  Atari  cartridges  are  protected  and  cannot  be  disassembled  using  thisdisassembler^ 
Also  works  as  an  ASCII  interpreter,  translating  machine  code  into  ASCII  characters  6502  DISASSEMBLER  requires  only  8K  of  user  memory  and  runs  on  both  the  Atari  800 

and  the  Atari  400.  .  -.  ,^.  .....-.,-....- __„„^.. ,..-«r.-  = . 

Cassette  - 111.95       Diskette  •  tU.95 


QUTiLrry  softwtire 

6660  Reseda  Blvd  ,  Sude  105.  Reseda.  CA  91335 
(213)344-6599 


WHERE  TO  GET  IT:  Call  us  al  12131 344  6599  for  the  name  ol  the  Quality  Software  dealei  nearest 
you  Knecessaryyoumayordei  directly  from  us  M  aslercard  and  Visa  cardholders  may  place  or 
ders  by  telephone  Or  mail  jour  check  or  bankcard  number  to  Quality  Sottwaie.  6660  Reseda 
Blvd ,  Sude  105.  Reseda.  CA  91335.  Caliloinia  residents  add  S'r  sales  tax  SHIPPING  CHARGES: 
Within  NorltiAmeiica  orders  must  include  Jl. 50  loi  lirst  class  shipping  and  handling  Outside 
North  America  the  charge  for  airmail  shipping  and  handling  is  J5.00.  Pay  in  U.S.  currency 
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Program 
Development 
In  Atari  Basic 

Paul  E,  Hoffman 
Cambridge,  MA 

The  Atari  microcomputers  are  good  machines  on 
which  to  program,  especially  in  Basic.  The  editor  is 
easy  to  use  and  has  many  nice  features.  Unfortu- 
nately, developing  large  programs  on  the  Atari  is 
not  as  easy  as  one  would  like  due  to  the  lack  of 
dynamic  program  chaining. 

Optimally,  you  should  be  able  to  make  many 
program  fragments  and  be  able  to  run  a  linking 
program  that  would  Icjok  like: 

10  ENTER  'DiPROGl' 

20  ENTER  'D:PROG2' 

30  ENTER  'D:PROG3' 

and  so  on,  that  would  bring  all  of  the  programs 
together.  The  problem  is  that  the  Atari  operating 
system  slops  the  program  right  after  an  ENTER, 
so  that  a  running  program  can  only  have  one 
ENTER  command. 

The  way  around  this  restriction  is  to  use  the 
screen  as  a  device  to  give  the  ENTER  commands  to 
link  the  large  program.  Of  course,  you  can  simply 
type  the  commands  in  each  time  they  want  to  link 
the  programs.  It  is  easier,  however,  to  have  the 
Atari  display  the  ENTER  commands;  all  you  have 
to  do  is  RETURN  over  them. 

Breaking  up  a  longer  program  into  modules 
that  are  about  two  screens  long  makes  debugging 
programs  much  easier.  Small  program  fragments 
can  be  listed  completely  without  having  to  guess 
which  line  range  you  want.  Also,  the  fragments  can 
be  broken  up  into  logical  units  of  the  program, 
such  as  the  variable  definitions,  screen  setup,  and 
so  forth. 

Developing  a  program  using  fragments  has 
some  drawbacks,  but  they  arc  easy  to  overcome. 
You  must  be  careful  about  using  CiOTO's  across 
segments,  since  you  may  decide  to  leniunber  some 
lines  in  the  segment  to  which  you  are  jumping. 
This  problem  can  be  avoided  by  using  as  few 


GOTO's  as  possible,  and  by  always  going  to  REM 
statements  that  tell  you  which  lines  to  change  if  the 
line  you  are  going  to  needs  to  be  renumbered. 

Subroutines  can  be  treated  the  same  as  state- 
ments that  are  gone  to,  but  there  is  a  more  efficient 
way  to  deal  with  them.  GOSUB's  that  point  to  the 
beginning  of  a  program  are  found  by  the  program 
more  quickly  than  those  that  point  to  the  end,  so 
putting  all  of  your  subroutines  in  the  Ilrst  module 
of  a  program  will  make  your  program  run  faster. 
If  all  you  use  the  fust  module  for  is  to  licfuie 
constants  and  subroutines,  it  is  unlikel)'  that  you 
will  need  to  renumber  much,  thus  avoiding  the 
problems  with  GOTO's. 

There  are  two  other  restrictions  for  using  this 
program.  The  first  is  that  you  can  only  have  up  to 
ten  modules,  due  to  the  amount  of  space  each 
ENTER  takes  on  the  screen.  Second,  if  vou  re- 
number your  program  using  a  Basic  renumbering 
program  available  from  some  third-paity  vendors, 
you  should  only  renumber  the  full  program  to 
avoid  incorrect  GOTO's. 

The  program  in  Listing  1  can  be  used  to 
display  the  ENTER  commands  on  the  sci'cen  to 
link  together  10  programs  called  PRO(;i,  PROG2, 
...  You  can  change  the  name  of  the  program  in 
lines  30  and  60  to  any  name  you  want.  Once  the 
program  has  been  run,  simply  hit  RETURN'S  over 
each  line,  and  your  program  will  be  linked  and  in 
memory. 

Line  10  clears  the  screen;  lines  20  through  50 
display  the  first  five  ENTER's  (for  PROGl  through 
PROG5).  The  CHR$(34)  is  a  quote  mark;  using 
CHR$(n)  instead  of  the  character  itself  in  program 
listings  makes  them  easier  to  read  and  reproduce. 

Lines  60  and  70  write  a  one-line  program  that 
clears  the  screen  and  displays  the  next  five  enters 
(for  PROG6  through  PROGIO).  If  you  have  five  or 
less  program  fragments  to  link,  you  can  eliminate 
lines  50  through  70.  Line  80  puts  the  cursor  over 
ihe  first  EN'f  ER  (after  the  READY  prompt  ap- 
pears), then  line  90  clears  the  linking  program 
from  memory. 

LJsing  the  above  scheme  for  writing  large 
programs  should  make  (hem  easier  to  edit  and 
develop.  We  can  always  hope  that  future  Atari 
versions  of  Basic  (as  well  as  other  programming 
languages)  gi\'e  more  Hexibilit)  in  program  linking 
so  that  programs  like  this  one  arc  not  necessary. 


iO  ?  CHR*(125)  :REI^  CLEAR  THE  SCREEN 

20  FDR  1=1  TO  5 

30  ?  :7  :?  "ENTER  " ; CHR* ( 34 > ; "D: PROG" ; I ; CHR* (34) 

40  NEXT  I 

50  7  :  ? 

60  ?  "P0K:E84,  l:PaKE85,0:F0RI==6T010:7:?:?";CHR*(34)  ;  "ENTER  ";CHR*(34)  ;  ";CHR$(34)  ; 

";CHR$(34) ; "D:PRDG";CHR*<34) ; 

70  ?  "; I;CHR*<34) :NEXT  I : POKE  84, i: POKE  85,0" 

80    POKE    84,1: POKE    85,0 

90    IMEl*J  C 


July.  1981.  Issue  14 


COMPUTi! 


133 


Announcing: 

COMPUTE!'s 
FIRST 
BOOK  OF 
ATARI' 

Since  our  first  issue  in  the  Fall  of 
1979,  we've  provided  more  Atari 
information  to  owners  and  users 
tinan  any  other  magazine  in  the 
industry. 

Now  we're  taking  the  best  of  our 
published  materiai,  adding  new 
materiai,  and  putting  it  all  together 
into  our  first  special  Atari  book: 

COMPUTErs  First  Book  Of  Atari 

will  be  available  in  late  July,  With 
a  design  intended  to  make  it  easy 
to  use,  and  contents  aimed  at 
assisting  a  range  of  users  from 
beginners  to  advanced,  you'll  find 
that  COMPUTE!  Books  will  become 
a  valuable  and  permanent  addi- 
tion to  your  reference  library.  But 
what  else  would  you  expect?  After 
ail,  we're  the  resource. 

Reserve  your  copy  today  at  your 
COI^PUTE!  dealer,  or  if  one's 
not  handy,  use  the  coupon  below 

to  order. 

We  accept  Master  Ctiarge  and  Visa 
Dealer  Inquiries  invited 

ATAfJI  ■  J^egistered  Trademork  ot  Ataf i  Inc. 


Please  send  me copy(s}  of  COMPUTE!'*  First  Book 

Of  Atari  (!•  S12,95  each. 


I   Name. 


Address . 


I   City. 


.  State  _ 


.Zip. 


!    Please  add  S2.00  for  postoge/handling  for  each  book  ordered.  I 

I    Pavmenl  must  be  in  US  funds.  S1.00  billing  fee.  | 

,    All  orders  from  outside  US  and  Canado  must  be  prepoid  ■ 


SPACE  SHUTTLE 
Launch  and  Ascent  to  Orbit 

Simulation  Software  for  the  ATARI  800* 

Using  a  joystick   interface,  you   steer  the 

Space  Shuttle  through   launch   and   into   orbit. 

Not   a  game,  but   a   serious   simulation. 

Requires    24K  RAM   and   1    joystick. 

"ATARI  is  a   trademark  of  ATARI,  Inc. 

Cassette  Only  S9.95    (ages   12  to  adult) 

*eT?i3CBB0DCfle 

SOFTWARE 
P.O.  Box   214  COCOA   BEACH,  FLORIDA  32931     | 


/DSBB'X 


OFFICIAL  SQFTtKflRE 
BU^EP)5  GUIDE 


AN  EXTENSIVE  GUIDE 

TO  ALl 

MAJOR  SOFTWARE  FOR 

MAJOR  HARDWARE 

SYSTEMS 

anna. 
KFmaH 

•    Ovir  lODOPfBaiiml 

AppitcltiDHt 

ZSSBT-'' 

•     Verticil  Softwirt 

J«U 

-    EIC  FIVE 

•    Qaefillng  Systems 

Sind  S8.9S 
plus  $1.00  pDst>g8«nd  Hlndljngto; 

OFFICIAL  SOFTWARE  BUYERS  CUIOE 
P.0.GiiiiaZ7S,Rinil.  Nividi  B9S1 1 

Plitst  iILdw  3  wiihi  for  drlivary. 
DEALER  maUIHIUINVITEIl 


ADVENTURE 

for  your 
ATARI  400/800 

uqi.»i   the  quest 

..t  and  now,   after  the  final  battle, 
the  rerrviants  of  humankind  manage  to 

survive  in  small  bands  scattered 

arouncJ  the  globe.     Chaos  and  savagery 

reign  supreme  on  the  devastated  planet. 

Can  you  discover  the  awesome  secret 

that  will  save  Earths  dwindling 

populace  from  a  fate  worse  than  death? 

As  you  progress  thru  the  more  than  60 

locations  in  this  adventure,   you 

encounter  obstacles  and  aidsi 

loathsome  beasts  and  helpful  strangers. 

But  beware,  one  false  move  could 
mean  doom  both  for  you  and  all  mankind. 
THE  QUEST  is  the  first  volume  in  a 

larger,   multi-part  adventure. 
Completion  of  the  entire  adventure 
will  require  purchase  of  added  volumes. 
Graphics  and  sound 
enhance  this  classic  game. 

16K/Tape.$  14.95      24KyDl«k-$19.e8 

SURVIVAL  SOFTWARE 
3033  LA  9ELVA.  •B306 
SAN  MATEO,  CA.  94403 
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OSI  C1P  Newspaper  Route 
Listing  Program  Part  two 


Charles  L,  Stanford 
Qnnaminsor\  NJ 


Running  The  Program 

With  all  tlic  pica  rubles  and 
caveats  out  of  ilie  way,  let's  take  a 
look  at  the  program.  Line  0 
through  whatever  contain  the 
customer  list.  I  found  it  easiest  to 
enter  the  first  lime  directly  as 
DATA  Stalemenis.  We  devised  a 
form  (see  Listing  2),  and  John 
filled  it  out  from  his  collection 
cards  and  entered  the  data  into 
the  program  over  a  period  of 
several  days.  Note  thai  Line  0 
contains  the  number  ot  customers. 
We  vary  that  to  match  the  route, 
but  keep  the  number  of  DATA 
lines  at  75.  The  program  doesn't 
care  as  long  as  there  are  more 
DATA'S  than  READ's.  Be  very 
careful,  howe\er,  that  cverv  line 
has  an  identical  number  of 
characters. 

When  printing  to  the  screen 
or  to  an  external  device.  Line  425 
can  be  used  to  select  ihe  format  of 
the  list.  If  you  want  only  the 
Sunday  route,  use  a  line  such  as 
IFD(X)  <>  1  ANDD(X)  <>  SAND 
D(X)  <>  6  THEN  GOTO  460. 
Note  that  AND  and  not  OR  is 
used  for  <>  IPs. 

The  BASIC  Garbage  Collector 
Bug 

There  is  one  moi  c  problem 
involved  In  getting  this  program 
to  run  successfully.  Fhal's  (he 
Garbage  C^ollection  Bug  in  BASIC 
ROM  NunilxM-:^  Most  OSI 
owners  probabl)'  already  know 
about  this  problem,  but  as  an 
assist  for  those  who  arc  new  to  it, 
a  short  background.  When  the 
ROMs  were  programmed,  there 
were  two  code  errors  \vitliin  the 
Garbage  Collector  Routine 


OF  customers" ;N 
"Namc"; 

"No.";TAB(35};"St.'' 
''D";TAB(lt5);''P" 


Listing  2 

10    INPUr'NuMBfR 
20  PRINTTAB(12 
]0  PRINTTAB(25 
(0  PRlNTTAB{ltl 
50  F0RX=1T0N 

50  PRINTRIGHTK"    *'+STR$(x),2)  ; 
70  PR  I  NT"  DATA"; 
i0  PRINT":    ::::::::,"; 
90PRINT":     ::::,::     :,:    -,:    :" 
100   NEXT 
OK 


S 


OK 

RUN 

Number  of  customers?  5 
Name 
1  DATA :::::::: 
2DATA:  ::::::; 
3DATA:  ::;:::: 
4DATA:  ::::::; 
5DATA:  ::::::: 

OK 


No. 


St. 


starting  at  $B  147  in  ROM  3.  The 
errors  rion'l  stop  the  routine  from 
running,  but  they  sure  keep  it 
from  doing  anything  useful.  The 
GC  is  iiecessarv  to  luido  the 
damage  lo  memory  caused  by  the 
accumulation  of  strings  in  upper 
RAM.  When  a  string  is  concaten- 
ated, or  even  recreated,  all  ver- 
sions are  retained.  If  you  say  that 
A$  =  AS  +  A$.  both  \crsions 
stay  in  existence.  You  can  see  that 
an  active  routine  such  as  the  one 
at  Line  900  of  Listing  1  will  soon 
use  up  all  the  RAM.  But  the  GC  is 
automatically  called  whenever 
RAM  gets  short,  and  all  the 
rcdimdanl  strings  are  discarded. 
On  the  OSI,  not  only  doesn't  this 
happen,  the  whole  program 
hangs  up.  the  screen  pulses,  and 


only  a  quick  "BREAK"  cati  save 
source  code  destruction. 

There  arc  several  s<)lutions. 
One  is  to  buy  one  of  lie  coi  lected 
I'ROMs  available  iron  several 
souices.  Bui  Rodger  Ol.sen  of 
.\arfivark  advised  me  that  even  a 
tf[)airefl  OSI  CC  isn't  perfect.  Jle 
suggests  the  software  fix  in  The 
(Real)  First  Book  of  OSL  I  just 
oiflered  my  copv,  so  I  can't 
connnenl.  What  I  have  done  is 
include  a  fix  I  devi.sefi.  whit  h  puts 
a  repaired  OSI  GC:  in  Page  2  of 
RAM  (ihe  unused  part  starting  at 
.$0222).  It  is  shown  in  Listing  3. 
"S  on  nuist  remember  that  a 
RRE.AK  will  rec|uii-e  that  the 
\'ectoral  locati(jns  I  I  ;in(l  12 
(Dec)  be  reset.  The  (iC  will  not  fit 
between  50222  and  S()2FF,  so  it 
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TI^M 


OUT-OF-THIS-WORLD  PERSONAL 


Look  at  this! 


\1 


I 


cWiliMil 


Ohio  Scientific 
Superboard  II 

$299 

•  It's  the  first  complete  computer 
system  on  a  board. 

•  Superboard  II  uses  the  ultra 
powerful  6502  Microprocessor 

•  8K  Microsoft  BASIC-in-RDM 

•  4K  static  RAM  on  board, 
expandable  to  BK 

•  Full  53-key  keyboard,  with  upper 
and  lower  case.  Plus  user 
expandability. 

•  Video  interface  and  audio 
cassette  interface. 

The  Ohio  Scientific  Superboard  II  at 
S299  —  in  today's  economy  —  has 
got  to  be  the  best  buy  by  far.  It  will 
entertain  you  with  spectacular 
graphics  made  possible  by  its  ultra 
high  resolution  graphics  and  super 
fast  BASIC.  It  will  help  you  in  school 
or  industry,  as  an  ultra  powerful 
scientific  calculator.  Advanced 
scientific  functions  and  a  built-in 
"immediate"  mode  allow  you  to 
solve  complex  problems  without 
programming. 

The  Superboard  II  can  be 
expanded  economically,  for  business 
uses,  or  to  remotely  control  your 
home  appliances  and  security.  Even 
communicate  with  other  computers. 

Read  what's  been  written 
about  Superboard  II: 

"We  heartily  recommend  Super- 
board  II  for  the  beginner  who  wants 
to  get  into  microcomputers  with  a 
minimum  cost.  A  real  computer 
with  full  expandability." 
-POPULAR  ELECTRONICS,  MARCH  1979 

"The  Superboard  II  is  an  excellent 
choice  for  the  personal  computer 
enthusiast  on  a  budget." 

-BYTE,  MAY  1979 


Look  at  these  easy  hardware  prices: 

G10  Board  For  use  with  Superboard  II  and  Challenger  1  P. 
8K  static  RAM.  Expandable  to  24K  or  32K  system  total. 
Accepts  up  to  two  mini-floppy  disk  drives.  Requires  +  5V 
@4.5  amps. 

Mini-Floppy  Disk  Drive  Includes  Ohio  Scientific's  PICO  DOS 
software  and  connector  cable.  Compatible  with  610 
expander  board.  Requires  -«- 1 2V  @1 .5  amps  and  -i-  5V  @ 
0.7  amps.  [Power  supply  S,  cabinet  not  included.] 
630  Board  Contact  us  for  important  details. 
AC-3P  1 2 "  combination  black  and  white  TV/video  monitor. 
4KP  4K  RAM  chip  set, 

PS-005  SV  4.5  amp  power  supply  for  Superboard  II. 
PS-003  1 2V  power  supply  for  mini-floppies. 
HF  Modulator   Battery  powered  UHF  Unit. 
CS-900B  Metal  case  for  single  floppy  disk  drive  and  power 
supply-  [While  stock  lasts.] 

AC-12P  Wireless  remote  control  system.  Includes  control 
console,  two  lamp  modules  and  two  appliance  modules,  for 
use  with  B30  board. 

AC-17P  Home  security  system.  Includes  console,  fire 
detector,  window  protection  devices  and  door  unit  for  use 
with  630  board. 
C1P  Sams  CI  P  Service  manual 
C4P  Sams  C4P  Service  manual 
C3  Sams  Challenger  III  manual 
Ohio  Scientific  and  independent  suppliers  offer  hundreds  of  programs  for  the 
Superboard  II,  in  cassette  and  mini-floppy  form. 


S  298 


299 

229 

159 

79 

45 

45 
35 

49 

175 

249 

8 

16 

40 


Freight  Policies  AI  orders  olSim  or  more  are 
sf>pped  TOght  prepad.  Orders  of  less  Chan  S1  DO  please  add 
S4.D0  CO  cover  shtpptng  costs.  0hK}restientsadd5.5%  Sales  Tax. 


lev  I 
B  00  AM  CO  5:00  PM  E  D  T 
TOLL  FREE:  1-900-321-5805 


Guaranteed  Shipment 

Oeveiand  Consuner  Computers  &  Components 
guarwitees  slipment  of  computer  systems 
iwUwl  48  hours  upon  recepC  of  ytxr  order 
Our  lailura  to  ■nip  within  48  Waurm 
Hltitln  you  Co  S39  of  wiftiHar*,  FflEE. 


To  Order:  Or  to  get  our  free  catalog  CALL  1-800-3Z1-5805  TOLL  FHEE.  Charge  your 
order  to  your  VISA  or  MASTER  CHARGE  account.  Ohio  residents  call:  [^^6]  4B4-B047. 
Or  write,  including  your  check  or  money  order,  to  the  address  listed  below 

n  CLEVELAND  CONSUMER 
'■computers  &  COMPOIMEIMTS 

P.O.  Box  46627 
Cleveland,  Ohio  44146 


Order  Form: 


CLEVELAND  CONSUMER  P.O.  Box  4G827 

COMPUTERS  &  COMPONENTS  Clnveland,  Ohio  44146 

'Z  Superboard  II  5299.  ;  RF  Modulator  S35. 

12  61 0  Board  5298.  \J  AC-3P  1  2 "  B/W  f^/lonitor  $1 59. 

n  Mini-Floppy  Disk  Drive  S299.  D  C1 P  Sams  Manual  SB. 

[Attach  separate  stieet  for  othier  items.] 

NAME ^ 


I 
I 
I 
I 
I 
I 
I 
I 

I        Orders  ot  less  than  SI  DO,  please  add  Sil.DD  to  cover  shipping  costs-  Orders  will  be  accepted  (rE)m.U,S.  and  ^ 

Canada  only  All  pnces  quoced  are  US,,  dace  of  publication,  standard  UPS  shipping  FOB  the  faccory,  ^    j 


ADDRESS: 

CITY: 

PHONE:    _ 


.  STATE: . 


_ZIP:. 


Payment  by:  VISA 

Credit  Card  Account  #_ 
Expires 


MASTER  CHARGE . 


MONEY  ORDER. 


Interbank  #(Master  Charge] 


TOTAL  CHARGED  OR  ENCLOSED  S_ 


.  [Ohio  Residents  add  6-5%  Sales  Tax] 
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^  SOFTWARE  FOR  OSI 

^  VIDEO  GAMES  1 $1S. 

jj  Three  Games,  Head-On  is  like  the  popular  arcadegame.  Tank 

"V-  Battle  is  a  tank  game  for  two  to  four.  Trap!  is  an  enhanced 

>j  blockade  style  game. 

kj  VIDEO  GAMES  2 $15. 

>*  Three  games.  Gremlin  Hunt  is  an  arcade-style  game  for  one  to 

iw  three.  Gunfight  is  a  duel  of  mobile  artillery.  Indy  is  a  race  game 

•*  for  one  or  two. 

V     ADVENTURE:  MAROONED  !N  SPACE  $12. 

jy     An  adventure  that  runs  in  8K!  Save  your  ship  and  yourself  from 
>*■     destruction. 

•^     DUNGEON  CHASE S10. 

>y     A  reai-time  video  game  where  you  explore  a  twenty  level 
">*■     dungeon. 

■^  BOARD  GAMES  1 S15. 

jw  Two  games.  l\/tini-gomoku  is  a  machine  language  version  of 

I*  five  stones  gomoku.  Cubic  is  a  3-D  tic-tac-toe  game.  Both  with 

>j  graphics. 

>j     DISASSEMBLER  $12. 

[*     Use  this  to  look  at  the  ROMs  in  your  machine  to  see  what 

-tpt     makes  BASIC  tick.  Reconstruct  the  assembler  source  code  of 

machine  language  programs  to  understand  how  they  work. 

-^     Our  disassembler  outputs  unique  suffixes  which  identify  the 

L^     addressing  mode  being  used,  no  other  program  has  this! 

.        SUPER!   BIORHYTHMS S15. 

■\i.     A    sophisticated    biorhythm    program    with    many    unique 
>  features. 

^     CI  SHORTHAND $12. 

yT  Use  only  two  keystoenterany  oneof  theBASIGcommands 

1      4&        /i  ot  keywords     Saves    much    typing    when   entering 
^^m3^^_||  P''09''3nis.   Vi/ritten  in  machine  language. 

^^^^^^^IP     rof  .lit  BASIC-.n-ROM  ^'i^ivir^  S*'I«-CM*<1  progr.ims  .iv.i-t.itii.- 
^^^r  Ir       ''n'l"i^    Cnlijr  ,lrtit  i^iinrt  on  virtno  qamf.^ 

7**,  Send  for  FREE  catalog 

.^^n  Q  I  O  M  SOFTWARE  ASSO. 

"If  "*^V^  n  I  V^  1^  147  Main  St.  Ossining.  NY  10562 

u.scs  pari  of  ihc  original  code  a.s  siibi-oiiiiiu's. 
There  are  .several  oilier  fixes  available.  Inn  one  or 
the  other  nni.si  be  u.sed  or  vou'll  have  to  omii  the 
names,  and  reset  die  siring  pointer  at  12!)  and  130 
(Dec)  each  lime  a  loop  of  the  Routine  ai  Line  <JI)() 
is  run. 

As  is  oiten  the  case,  this  [>rograin  concept  can 
be  extended  into  nianv  other  areas.  How  about  a 
checkbook  balancer  with  the  [Mirpose  ol  each 
check  printed  out  aloni>  with  iis  lunnbi'r  and 
amount?  A  Christmas  card  checklist?  The  names 
tan  be  any  length  consistent  with  vour  R,\M:  jtist 
change  the  "".S"  spaces  wherever  ihev 
appear.  Routines  to  add  values  of  Sample 

numeric  \  ariabU-s  can  be  easilv  adrled. 


Table  1 

]0  0IMN$(2) :DATA"A","BBB" 

20  X=j2f:Yr=3:Z=U87 

30  READN$(1) :READN$(2) 


0^00  00 

Start  Source 

ef33E 

SS 

ASCI  1  -  X 

Code: 

3^^ 

00 

2nd  Char 

0\ 

17 

AODRtSS 

or 

H0  00 

Valuc  or  X 

02 

^ 

NEXT  L INE 

iti 

00 

IN  32-BiT 

% 

Line 

\2   00 

Floating  Point 

^ 

NUMBER 

!45 

00 

Binary 

% 

?E 

Token  - 
ASCI  1  - 

DIM 
N 

59 
31 

ASCI  1  -  Y 
-  1 

% 

2A 

_ 

% 

kh 

82 

Value  or  Y1 

28 

_ 

( 

}9 

U0 

t 

32 

29 

- 

2 

) 

00 
00 

0B 

3* 

_ 

Ha 

5* 

ASCI  1  -  Z 

Cfc 

«3 

Token  - 

DATA 

HB  00 

2no  Char 

0D 

22 

ASC) 1  - 

M 

i»c 

»? 

Va L  u c  or  2 

0t 

Ul 

_ 

A 

liD 

® 

0F 

22 

_ 

II 

1*E 

y0 

?C 

_ 

t 

Hr 

00 
UE 

11 

22 

„. 

n 

50 

ASCI  1  -  N 

12 

U2 

. 

B 

51 

80 

Toke>j  _  String 

13 

I42 

_ 

B 

52 

'3 

7+(DIM+l)*li 

1*2 

_ 

8 

P 

00 

Alwavs  00 

15 

22 

. 

11 

01 

Alwats  01 

16 

00 

End  Qf    1 

Line 

55 

00 

Alwats  00 

!^ 

2A 

Address 

or 

55 

03 

DIM  +  1 

?? 

NEXT  L 

INE 

^ 

00 

Tour  Bytes  to 

19 

Ll  ME 

00 

EACH  ELEMENT  or 

?> 

^f, 

NUHBER 

59 

00 

AN  array;   START 

IB 

58 

ASCI  1  - 

X 

5A 

00 

WITH  rLEWCNT  0 

1C 

AB 

Token  - 

:.: 

5B 

01 

Len  or  Jtr 1  NO 

ID 

30 

ASCI  1  - 

0 

5C 

0£ 

Addr  1:  ss  or 

IE 

3A 

- 

5D 

^ 

String 

ir 

59 

- 

y 

5E 

Always  00 

20  31 

- 

t 

5*" 

03 

Len  or  String 

21 

AB 

Token  - 

= 

60 

12 

Address  or 

22 

33 

ASCI  1  - 

3 

61 

03 

$TB ING 

13 

3* 

62  00 

Always  00 

5* 

z 

0363 

Unused  RAM 

2S 

AB 

3S 

Token  - 

= 

26 

ASC II  - 

It 

11 

38 

- 

8 

11 

> 

7 

29 

m 

End  or  i 

.  INE 

0-i2k 

Through  0338 

HOLDS  Line 

#30 

033c  00 

End  of  line 

3D 

00 

Code  for 

3E  m 

"L*sT  Line" 

Run-Entire  List 

John's    Inquirer    Route 


1. 

Stanford 

2903 

Georgetown  Rd 

Daily 

4,  Sun 

Garage 

2. 

Jones 

2 

Barton  Ct 

Daily 

ONL  Y 

Rear  door 

k 

Smi  th 

0 

Branch  Pike 

Daily 

&   Sun 

Under  rug 

5- 

0 

Listing  lA 

0  DATA 75 

1  DATA'*STANroRD"',2903,    1,1,1 

2  DATA"JoNEs  ",         2,12,2,3 

3  DATA"Smith  ",    321,    2,1,5 
5   REM-LINES   I*  THRU    73    OMITTED 
7»t   DATA"  ",         0,    0,0,0 
75    DATA"  ",         0,    0,0,0 


Sample  Run-Sunday  Customers  Only 

John ' s    I  nqu  irer    Route 


1.    Stanford      2903   Georgetown   Rd        Daily   &.  Sun     Garage 
3.    Smith  32I    Branch   Pike  Daily   &.  Sun      Under    rug 
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Listing  IB 

20(?  READX:N=X:D!MN$(X),A(X),S(X),D(X) 

20}    DIMP(X),S1$(15) 

202  GOSUB700 

205  F0RX=1T09:PRINT:NEXT 

210  PR1NT"NcwspapER  Route":PRINT 

215  PRINT"1.   Print  the  route  to  printe 

r": PR  I  NT 
220  PRINT"2.   Print  the  route  to  screen 

" : PR  I  NT 
225  PRINT"3.   Add  a  customer" : PRINT 
230  PRINT"5.  Delete  a  customer" : PRI NT 


240  INPUT''Enter  your  prcfercnCc"  ;X2 

2lt5  ONX2GOSUB300,H00,500,600 

250  GOTO205 

300  REM-PRINT    TO   PRINTER 

310   POKE5I7.I 

320  GOSUBU20 

330  POKE517,0 

340  RETURN 

400  REM-PRINT  ROUTE  TO  SCREEN 

1+05   PR  I  NT:  PR  I  NT:  PR  I  NT:  PRINT 

1+10  PRI  NTTABf  15)  .-"John's    Inquirer   Route 

U15   PRINTTAB(15);'' 

1+20  PR|NT:PRINT:F0RX=1T0N 
ii25    REM-SELECT    LIST   ON    THIS    LINE 
lt30  PRINTRIGHTt("      VSTR$   X)  .2)  ;  "  .  "; 
U55   PRINTTAB(V)  :N*(X)  ;  TAb(  14)  ;R  I  GHTM" 

'^+STR$(A(X)),U);  ^,  ,  ^^ 
kk0   PRINTTAB(19);Slt(Sfx)}; 
Ul»5  PRINTTAB(35)  ;DM(d(x))  ; 

U50  printtab(Ii8);pi?(p(x)) 

H60  X=USR(X) 

lt70  NEXTX 

km  RETURN 

500  REM 

510  PRINT"       Add  a  custom£r":PRINT 

515  INPUT''Enter  customer's  code  number" 
;X3:PRINT 

520  FORX=NT0X3+1STEP-1 

525  N$(X)=N$(X-1) :A(X)=A{X-1) :S(X)=S(X- 
U :D(X)=D(X-1) :P(x)=P(X-1) 

530  X=USR(X) : NEXTX 

535  INPUT"Enter  customer's  name";N$(X3) 
: PR  I  NT 

5I+0  INPUT"Entcr  house  number'';A(X3)  :PRI 
NT 

5I+5  |NPUT"Enter  street  name  code  number 
";Stx3) :PRINT 

550  INPUT"Enter  delivery  code  number'';D 
(X3)  :PR!NT 

555  INPUT"Enter  special  location  code  n 
umber" ;P(X3) :PRINT 

560  nMx3)=left$(nMx3)+"      ",8) 

565  PRINTN$(X3);A(X3);S1$(S(X3));D1M0C 

x3));PU(P(x3)y 
575  x-usr(x) 

580  INPUT''Add  another";  I  $ 

585  |FLEFT$(l$,l)="Y''THEN500 

590  GOTO800 

600  REM-OELETE 

6l0  PRINT:PRINT:PRINT:PRINT 

620  INPUT"Enter  customer's  code  number" 
■  xU 
'630  forx=xHton-i 

640  N$(X)=N$(X+1) :A(X)=A(X+1) :S(X)=S(X+ 


1)  :D(x)=0(X+0  :P(X)=P(X+1) 

645  x=usR(x) 

650  NEXTX 

660  Nt(N)=" 

670  A(N)=0:S(N)=0:D(N)=0:P(N)=0 


680  INPUT"Delete  another"; 1$ 

685  |FLEFT$(I$,1)="Y"THEn600 

690  GOTO850 

-jm   REM-STARTUP  SEQUENCE 

710  F0RX=1T0N 

720  READN$(X) :READA(X) :READS(x) :READD(X 
):READP(X) 

730  NEXTX  ^   ^ 

750  Sli(T)-"GE0RSET0WN  Rd" : SI  $ (2) -" Br AN 
CH  PiKE^:S1$(3)="EssEx  Ct" 

755  S1$(1|)='*SomCrset  Dr'':S1$(5)="Bergen 

DR'^:S1ii(6)="SALEM  Dr" 

760  Sli(7)="8RiCHAM  Ct":S1$(8)="Salem  C 
t'':SU(9)=  Cooper  Ct" 

765  S1|(10)="HUNTERDON  Dr":S1$(11)="Riv 
ERTON  Rd'':S1$(12)="BaRton  Ct"  _  ,^  ,_ 

768  S1$(13)=^CarR(AGE  Way":S1$(iU)="Mid 

DLESEX  Dr"  i,  .  - 

775  DU  1)="Dailt  i  Sun":D1$(2)-"Da»ly 
oNLY":D1li{3)="SuN  only" 


780  D1$ 


H)=''Sat  only":D1$(5)-"M-F  only" 


'Carport":?! 


:P1|(5)="Mail  box": 


:D1$(6)=''Sat-Suh  only' 

790  P1${1)="Garage":P1$(2)^ 
M3)="Rear  door" 

795  Pit  (4)="  In  door' 
P1H6)=''Unoer  rug" 

799  RETURN 

800  REM-SAVE  DATA  -  ADD  CUSTOMERS 

805  6=762 

810  F0RX=NT01STEP-1 
815  B=782+(X-1)*28 
820  GOSUB900:X"USR(X) 
825   NEXTX 

830  CLEAR :GOTO200 

850  REM-SAVE   DATA   -   DELETE   CUSTOMERS 
855   6=782 
860  F0RX=1T0N 
865   GOSUB900 
870  X=USR(X) 
875   B=B+6: NEXTX 
880  CLEAR :GOTO200 
900  REM-SAVE   DATA 
905    L$=LEFT$(Nt(X)+"  ",8) 

910  Q=8:POKEB,34:B=B+1:GOSUB995:POKEB,3 
U:B=B+1 
915   B=B+1:L$=RIGHT$(" 

920  Q=rl»:GOSUB995 

925   B=B+1:L*=RIGHT$(" 

930  Q=2:GOSUB995 

935   B=B+1:L$=RIGHT$(" 

940  Q=1 :GOSUB995 

9U5   B=B+1:L$=RIGHT$("    "+STR$(P(x) ) , l) 

950  Q=1 :GOSUB995 

955    RETURN 

995   F0RR=1T0Q:POKEB,ASC(MtD$(L$,R, D) :B 
=B+1 tNEXTR: RETURN 

999   END 
OK 

Listings 

Hi 000  REM-GARBAGE  COLLECTION  FIX 


''+STR$(A(X)),4 

"+STR$(S(X)),2) 
'+STR$(D(X)),t) 
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U1010 
1*1030 

U]m0 

1*1 070 
»t10b0 

v% 

1*1110 
1*1120 
UII30 

Mir 

OK 


.0 


POKEt1,3lt:POKE12,2 

FORX-0TO1 39 

Y=PEEK(H5383+X)  :POKE5lt6+X,Y 

NEXTX 

FORX=0Tol+6 

Y-PEEK(H5596+X) ;P0KE696+X,Y 

NEXTX 

P0KE61 3 , 1+ :  POKE699 , 2 :  POKE  700, 2k 

POKE629 , 1 77 : POKE630, 2 

POKE686,76!PGKE6a7,21 1 JPOKE688, 177 

POKE689 , 1 66 : POKE690, 1 57 

POKE691,208iPOKE692,3 

poke693,76:poke694,19:Poke695,T78 

POKE7li3,38:POKE74l*,2 


COMPUTEl's  Book  Cor 

Back  Issues: 

COMPUTE!  January,  1981,  Issue  8 

ner 

.$2.50n 
.$2.50n 
.$2.50n 
.$2,50n 
.$2.50a 
.S2.50n 

COMPUTE!  February,  1981,  Issue  9 

COMPUn!  March,  1981,  Issue  10   

COMPUTE!  April,  1981.  Issue  11  

COMPUTE!  May,  1981,  Issue  12  

COMPUTE!  June,  1981,  Issue  13 

Ordering  Information: 

Address  orders  to: 
Compute's  Book  Corner 
P,0,  Box  5406 
Greensboro,  NO  27403  USA 

Povmenl  in  US  fundi  required  wim  order.  MoslerCarcWIW  occepted.  All  ttefro  subiect 
to  availability  Piease  odd  the  following  omoynt(s)  fot  5tiipping*andling 
DS  S2.00  (UPS  Of  moil)  •  Cona<la  32-00  (mail)  •  Foreign  Aii  Moil  S5.00 

MATHEMATICS,  BASIC  SKILLS 

EXPLICITLY  PRODUCED  EXERCISES  IN  ARITHMETIC 

For  use  with  'PET/2D40  Disk  Drive/2Q22  or  2023  Printer 

Computer  programs  designed  for  use  by  the  classroom  teacher  as  a  primarv 
source  of  exercises  In  mathematics,  basic  skills.  Through  simple  question  and 
answer,  and  with  the  use  nf  aniv  one  computer  system,  a  teacher  may  satisfy 
all  individualized,  in-class  and  hameworh  requirements  for  drill  in  arithe- 
metic.  Students  work  directly  upon  exercise  sheets.  Difficulty  level  is  easily 
adjustable.  Answers  are  always  provided.  23  programs  included,  covering 
integers,  decimals,  fractions,  percent  and  much  more. 

ON  DISK  $99.99 

ALGEBRA 

EXPLICITLY  PRODUCED  EXERCISES  IN  ALGEBRA 

Sixteen  programs  in  linear  and  fractional  equations,  simultarteous  equations, 
quadratics,  signed  and  complex  numbe;  arithmetic. 

ON  DISK  $99.99 

(Arizona  residents,  please  add  4K  sales  tax.) 
Please  add  S1.50  for  postage  and  handling. 

T'AIDE  SOFTWARE  COMPANY 

P.O.  BOX  65 
EL  MIRAGE,  ARIZONA  85335 

-  Inquiries  Invited  - 

'Pn*  a  ■  mdemirk  of  CotnniDdore  Sutinso  Machinu,  Inc. 


Voracious 
Butterfly 

John  Wright 
Ottawa,  Canada 

The  name  came  after  seeing  the  program  run. 
Voracious  Butterfly  was  originally  just  a  first 
exercise  in  using  peeks,  pokes  and  graphics,  and  as 
a  visual  check  on  how  random  is  RND. 

Display 

A  24  X  24  section  of  the  screen  is  filled  with  G187, 
the  mini  chequerboard,  and  G43,  + ,  moves  around 
one  square  at  a  time  in  a  random  direction.  Each 
time  it  lands  on  a  new  square  it  'eats'  the  G187  and 
replaces  it  with  a  032  (Blank),  G42  (*)  or  a  character. 
When  all  the  characters  are  displayed,  the  end 
routine  pokes  in  another  word  and  strips  out  the 
remaining  G 1 87s.  A  counter  at  the  bottom  of  the 
screen  increments  by  100  every  100  steps. 

Program 

The  program  has  6  modules  and  a  main  line.  The 
subroutines  at  300,  500  and  1 1 00  are  called  once 
each  and  could  have  been  written  in  the  main  line. 
Conversely  L70  to  LI 50  could  have  been  another 
module. 

SUB  250  converts  from  X,  Y  coordinates  to  a 

POKE  address. 

SUB  300  to  480  reads  in  the  word  which  is  used  in 

the  end  routine,  puts  32  in  all  locations  of  the  MA 
matrix  to  POKE  blanks,  replaces  some  of  those  32s 
by  42s  to  sprinkle  stars  in  the  top  and  bottom 
thirds  of  the  screen,  and  zeros  counters. 
SUB  500  to  560  reads  character  data  into  MA  and 
puts  a  1  in  MB  corresponding  to  each  character 
in  MA. 

L70  to  155  picks  the  start  point  for  the  Butterfly 

and  POKEs  two  zeros  for  the  counter. 

SUB  800  to  960  takes  100  steps.  On  each  step  the 

contents  of  MA  are  poked  to  the  screen  location, 

the  contents  of  MB  are  added  to  TT  (MB  is  0 

unless  there  is  a  display  character  in  which  case  MB 

(X,Y)  is  1.  It  is  then  reset  to  0). 

L840  checks  conditions  for  a  ncjrmal  exit. 

L860,  870  give  the  next  step  in  the  walk,  with  equal 

probability  of  slaying  still  or  moving  to  any  of  the 

eight  adjacent  squares. 

L900,  910  stop  the  Butterfly  froiri  going  offscreen. 
Using  SGN  allows  it  to  be  done  with  one  statement 
instead  of  separate  IFs  for  Oand  25,  If  i  lie  Butterfly 
goes  off  left,  it  reappears  right  as  though  there  is  a 
wrap-around.  Similarly  for  top  and  boilom. 
SUB  1000  to  1090  adjusts  the  base  of  the  random 
number  by  incrementing  the  original  input.  This 
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WORD  PROCESSING  THE  EASY  WAY- 
WITH  MAXIPROS 

This  is  a  line-oriented  word  processor  de- 
signed for  the  office  that  doesn't  want  to  send 
euerv  new  girl  out  for  training  in  how  to  type  a 
letter. 

It  has  automatic  right  and  left  nnargin  justi- 
fication and  lets  you  vary  the  width  and  margins 
during  printing.  It  has  automatic  pagination  and 
automatic  page  numbering.  It  will  print  any  text 
single,  double  or  triple  spaced  and  has  text  cen- 
tering commands.  It  will  make  any  number  of 
multiple  copies  or  ch'ain  files  together  to  print  an 
entire  disk  of  data  at  one  time. 

MAXI-PROS  has  both  global  and  line  edit 
capability  and  the  polled  keyboard  versions 
contain  a  corrected  keyboard  routine  that  make 
the  OSI  keyboard  decode  as  a  standard  type- 
writer keyboard. 

MAXI-PROS  also  has  sophisticated  file 
capabibilittes.  It  can  access  a  file  for  names  and 
addresses,  stop  for  inputs,  and  print  form  letters. 
It  has  file  merging  capabilities  so  that  it  can  store 
and  combine  paragraphs  and  pages  in  any  order. 

Best  of  all,  it  is  in  BASIC  (0S65D  51/4"  or 
8"  disk)  so  that  it  can  be  easily  adapted  to  any 
printer  or  printing  job  and  so  that  it  can  be  sold 
for  a  measly  price. 
MAXI-PROS-  $39.95 

THE  EDSON  PACK 
ALL  MACHINE  CODE  GAMES 
FOR  THE  8K  C1P 
INTERCEPTOR    -You    man    a  fast  interceptor 
protecting   your    cities    from    Hordes   of    Yukky 
Invaders.  A  pair  of  automatic  cannon  help  out, 
but   the    action    speeds  up  with   each   incoming 
wave.    It's   action,   action   everywhere.    Lots    of 
excitement!   $14,95 

MONSTER  MAZE  -  An  Arcade  style  action 
game  where  you  run  a  maze  devouring  monsters 
as  you  go.  If  one  sees  you  first,  you  become 
lunch  meat.  Easy  enough  for  the  kids  to  learn, 
and  challenging  enough  to  keep  daddy  happy. 
SI  2.95 

COLLIDE  —  Fast-paced  tane-swilching  excite- 
ment as  you  pick  up  points  avoiding  the  jam 
car.  if  you  succeed,  we'll  add  more  cars.  The 
assembler  code  provides  fast  graphics  and  smooth 
action.  S9.95 

SPECIAL  DEAL-THE  ENTIRE  EDSON  PACK- 
ALL  THREE  GAMES  FOR  S29.95 

THE  AARDVARK  JOURNAL 
FOR  OSI  USERS  -  This  is  a  bi-monthly 
tutorial  journal  running  only  articles  about  OSI 
systems.  Every  issue  contains  programs  custom- 
ized for  OSI,  tutorials  on  how  to  use  and  modify 
the  system,  and  reviews  of  OSI  related  products. 
In  the  last  two  years  we  have  run  articles  like 
these  I 

1)  A   tutorial   on   Machine   Code   for   BASIC 
programmers. 

2)  Complete  listings  of  two  word  processors 
for  BASIC  IN  ROM  machines. 

3)  Moving  the  Directory  off  track  12. 

4)  Listings  for  20  game  programs  for  the  OSI. 

5)  How  to  write  high  speed   BASIC   —  and 
lots  more  — 

Vol.  1  (19801  6  back  issues  -  $9.00 

Vol.  2  (1981)  2  back  issues  and  subscription  for 

4  additional  issues  -$9.00. 


ACCOUNTS  RECEIVABLE  -  This  program 
will  handle  up  to  420  open  accounts.  It  will  age 
accounts,  print  invoices  (including  payment 
reminders)  and  give  account  totals.  It  can  add 
automatic  interest  charges  and  warnings  on  late 
accounts,  and  can  automatically  provide  and  cal- 
culate volume  discounts. 

24K  and  0S65D  required,  dual  disks  recom- 
mended. Specify  system. 
Accounts  Receivable.  $99.95 

•  •  •  SPECIAL  DEAL  -  NO  LESSI  '  •  * 

A  complete  business  package  for  OSI  small 
systems  -  (CI,  C2,  C4  or  C8).  Includes  MAXI- 
PROS  GENERAL  LEDGER,  INVENTORY, 
PAYROLL  AND  ACCOUNTS  RECEIVABLE  - 
ALL  THE  PROGRAMS  THE  SMALL  BUSI- 
NESS MAN  NEEDS.  $299.95 

P.S,  We're  so  confident  of  the  quality  of  these 
programs  that  the  documentation  contains  the 
programmer's  home  phone  number! 

SUPERDISK  It 

This  disk  contains  a  new  BEXEC  that  boots 
up  with  a  numbered  directory  and  which  allows 
creation,  deletion  and  renaming  of  files  without 
calling  other  programs.  It  also  contains  a  slight 
modification  to  BASIC  to  allow  14  character 
file  names. 

The  disk  contains  a  disk  manager  that  con- 
tains a  disk  packer,  a  hex/dec  calculator  and 
several  other  utilities. 

It  also  has  a  full  screen  editor  (in  machine 
code  on  C2P/C4))  that  makes  corrections  a  snap, 
We'll  also  toss  in  renumbering  and  program 
search  programs  —  and  sell  the  whole  thing  for  — 
SUPERDISK  II    $29.95  <  5  1/4")    $34.95  (3"). 


ANDFUN, 
TOO! 


BOOKKEEPING  THE  EASY  WAY 
-WITH  BUSINESS  I 

Our  business  package  1  is  a  set  of  programs 
designed  for  the  small  businessman  who  does  not 
have  and  does  not  need  a  full  time  accountant 
on  his  payroll. 

This  package  is  built  around  a  GENERAL 
LEDGER  program  which  records  all  transactions 
and  which  provides  monthly,  quarterly,  annual, 
and  year-to<Jat£  PROF  IT  AND  LOSS  statements. 
GENERAL  LEDGER  also  provides  for  cash 
account  balancing,  provides  a  BALANCE  SHEET 
and  has  modules  for  DEPRECIATION  and 
LOAN  ACCOUNT  computation. 
GENERAL  LEDGER  {and  MODULES)   $129.95. 

PAYROLL    is    designed    to    interface   with   the 
GENERAL     LEDGER.     It    will    handle    annual 
records    on    30   employees   with    as    many   as  6 
deductions  per  employee. 
PAYROLL-    $49.95. 

INVENTORY  is  also  designed  to  interface  with 
the  general  ledger.  This  one  will  provide  instant 
information  on  suppliers,  initial  cost  and  current 
value  of  your  inventory.  It  also  keeps  track  of  the 
order  points  and  date  of  last  shipment. 
INVEfMTORY  -  S59.95. 


GAMES  FOR  ALL  SYSTEMS 
GALAXIAN  -  4K  -  One  of  the  fastest  and  finest 
arcade  games  ever  written  for  the  OSI,  this  one 
features  rows  of  hard-hitting  evasive  dogfighting 
aliens  thirsty  for  your  blood.  For  those  who 
loved  (and  tired  of)  Alien  Invaders.  Specify 
system  —   A  bargain  at  $9.95 

MINOS  -  8K  ■  -  Features  amazing  3D  graphics. 
You  see  a  maze  from  the  top,  the  screen  blanks, 
and  when  it  clears,  you  are  in  the  maze  at  ground 
level  finding  your  way  through  on  foot.  Realistic 
enough  to  cause  claustrophobia.  —  $1 2.95 


NEW-  NEW -NEW 

LABYRINTH  -  8K  -  This  has  a  display  back- 
ground similar  to  MINOS  as  the  action  takes 
place  in  a  realistic  maze  seen  from  ground  level. 
This  is,  however,  a  real  time  monster  hunt  as  you 
track  down  and  shoot  mobile  monsters  on  foot. 
Checking  out  and  testing  this  one  was  the  most 
fun  I've  had  in  years!  -  SI 3.95. 

TIME  TREK  -  8K  -  Rea!  Time  and  Real  graphics 
Trek.  See  your  torpedoes  hit  and  watch  your 
instruments  work  in  real  time.  No  more  un- 
realistic scrolling  displaysl  —  59.95 

SUPPORT  ROMS  FOR  BASIC  IN  ROM  MA- 
CHINES -  C1S/C2S.  This  ROM  adds  line  edit 
functions,  software  selectable  scroll  windows, 
bell  support,  choice  of  OSI  Of  standard  keyboard 
routines,  two  callable  screen  clears,  and  software 
support  for  32-64  characters  per  line  video. 
Has  one  character  command  to  switch  model 
2  C1P  from  24  to  48  character  line.  When  in- 
stalled in  C2  or  C4  (C2S)  requires  installation 
of  additional  chip.  C1P  requires  only  a  jumper 
change,  —  $39,95 

C1E/C2E  similar  to  above  but  with  extended 
machine  code  monitor.  —  $59.95 


Please  specify  system  on  all  orders 

This  is  only  a  partial  listing  of  what  we  have  to  offer.  We  now  offer  over  100  programs,  data  sheets,  ROMS,  and  boards 
for  OSI  systems.  Our  $1.00  catalog  lists  it  all  and  contains  free  program  listings  and  programming  hints  to  boot. 

AARDVARK  TECHNICAL  SERVICES,  LTD. 

2352  S.  Commerce,  Walled  Lake,  Ml  48088 

(313)669-3110 
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was  done  lo  disiLirb  any  patterns.  It  also  sets  up  an 
exit  if  the  program  runs  too  long  and  the  Butterfly 
tires,  and  increments  the  display  counter. 
SUB  1100  to  1180  is  the  end  roudne.  It  POKES 
the  top  word  and  clears  out  the  remaining  G187s. 
LI 70,  470,  530  and  840  could  be  changed  to  the 
handwritten  version  to  make  the  display  part 
easier  to  change. 

Changing  the  Randomness 

The  original  version  did  not  have  the  routine  at 
LI 000,  the  Q  loop  at  L800  and  instead  of  wrap- 
around at  L900  and  910  it  had  fold-back.  This  can 
be  simulated  by: 

1030  REM  DUMMY  LINE 
900IFX  =  0ORX  =  25THENX  =  X-SX 
910  IF  Y  =  0  OR  Y  =  25  THEN  Y  =  Y^Y 

This  version  did  not  always  work.  On  one  occasion 
it  ran  for  about  35  minutes  and  left  two  sizeable 
areas  of  the  screen  untouched. 

Presumably  the  random  number  generator 
settled  into  a  pattern,  so  to  disturb  this  the  1000 
routine  was  introduced,  changing  the  base  after 
100  steps. 

Variations 

The  listing  includes  many  REM  statements  which 
can  be  omitted,  and  most  statements  are  1  to  a  line 
so  compaction  is  possible. 

Apart  from  'wrap-around  X  and  fold-back  Y' 
(which  I  have  left  in  my  archive  version)  or 
vice-versa,  the  variations  are  in  the  display 
capability. 

If  you  are  on  familiar  terms  with  him, 
300  IB  =  5 

3000  82,79,78,78,89 

may  be  acceptable. 

If  you  change  the  main  display  data,  you 
should  use  the  handwritten  version  of  LI  70,  470, 
530  and  840  or  recalculate.  Remember  that  the 
display  goes  in  bottom  first,  top  last. 

There  is  no  reason  why  the  displa)-  should  not 
be  a  picture  or  a  pattern.  In  this  case  the  'top'  word 
may  be  better  placed  at  the  bottom  by: 

1100  Y  =  1 

It  would  be  easier  to  have  the  display  data  as 
characters  and  blanks.  They  would  then  be  read  in 
by  string  variables  and  converted. 
45  BL$  -  "  24  spaces  " 
300  READA$ 
305   FOR  I  =  I  TO  LEN(A$):TW(I)  =  ASC(M1D$ 

(A$,I,l))rNEXTl 
505  READ  A$:A$  =  LEFT$(A$  +  BL$,24) 
520  MA(X,Y)  =  ASC(MID$(A$,X,1)) 
3010  DATA  "ABC  etc. 

Use  the  "  in  the  data  statement  if  there  are  leading 
blanks. 

Side  Benefits 

The  program  is  a  good  conditioner  for  a  flabby 
waist.  Judicious  use  of  body  English  may  guide  the 
Butterfly  to  uneaten  squares. 


1  Htf>     uijKHijiijijs  KUfJERFLy 

iij  yFfi    .jOhn  hRIGHT 

15  Iiifi  HH';24'24)jfiB';24!24> 

2ii  i?Ef!     'KhNDOfl  NHLK'   IiEH0n5TRhTI0H 

3 ft  !NPLiT"RHNIi!}H  NLiHBEH''INft;  RN=NI< 

40  00=54116: RhH  THIS  i5  FOR  iU  BORRD 

5(1  QiJSiJ1300 

bO  003111500 

?0  RtS    PICK  STftRT  POINT 

80  J=IMT(570*RhBi;Rh))+'1 

90  X=InT( J/24i+i 

100  v=j-24*(j^-i) 

HO  ij05UB25u 

120  P0i';E2<43 

140  REM    pfiiJSE  THEfJ  REMOUE  + 

150  FOR  ■J=iTOiflO:I=J;NFKTJ 

155  pnk;EOU+6!4H:pOKEno+7?48 

160  ijOSUBSOO 

170  IFTT=6iTHEfi200      iftt=ch... 

Ififl  GOSiJBlOOO 

190  iFCTO-lTHEHibU 

200  QOHLiFilOO 

210  IFCT=-iTHENPRINT'E)';HHUSTEii  BuTrERFLY" 

220  END 

247  Q£n 

248  REfl 

249  REH  SCREEN  POSiTION  FOR  KjY 

250  Z=uO-32*!'+i'! 
260  RETURN 

236  REN 

297  REH 

298  RFH     IfipUT  lUSPLfi!  MRTRIft 

299  REH    TOP  unRD 
500  1B=6 

305  FORI  =  lTOIB:REHTiTy(  DiNEiUi 

310  REH    BLhNk  SCREEN)  INPOT  BlSPlflV.  SET  Lip 

CuLiNTER  ««TRIK 
515  fuRK=iTt}30;PRi?IT; HtYJ.Y, 
317  POKEuO+lj32:REfi    ERhSE  CORSuR 
320  F0RK=1T024 
330  FfiRZl=lT03 
340  F0f?Z2=lT0H 
350  !'=H*(71-i)+72 
360  GOSUI250 
370  POKEZtlS? 
380  Hfl(K'V)=32 

390  REH    SThRS  RT  TQP  hND  BOTTOa 
400  iFZl=2THEN420 
410  !FRND(RN)<.15THENHH(l'^n)=42 
420  t1B()^i"V)  =  0 
450  fJFxTZ2?Zl<X 
460  REH    ZERO  COui-iTERS 
470  TT=0;CT=O .'  f  ^  o 
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480 

RETyi?H 

1160 

IFPEf 

i.\': 

''.)-'. 

.87THfNPtJf;F7.32 

497 

RES 

1170 

IJFxTi 

44R 

REfi 

iiSO 

RFTiiRH 

499 

SJJ  RERii  if|  EhTS 

3000 

BflTft 

9.1' 

73 

78; 55' 76? 68 

580  m.  T=iiT0i5 

5010 

BhTh 

32 

32 

82 ! 32 < 69 ! 69 < 69 

32? 65? 

32 

65?  32 

510 

FDRK=iT023 

3020 

liflTR 

32 

71 

7l!32>65'32565 

52.78- 

32 

78 

520 

REflBhH(HjV) 

3030 

BiiTR 

32 

32 

82j32!69!32!32 

j^?^5 

65 

65?  32 

530 

IF?ift(XsT)<;-32  THEJi  aB(x,V)=i    i 

:CH  =  CH+1           SO-iO 

r, .:  T  .-. 

m  1 « 

71 

32 

7i!  32?  65?  i'l' !  65 

32? 78' 

78 

78 

540 

timhs 

3050 

OBTR 

82 

32 

32?32!69?69!32 

32!65' 

32 

65?32 

560 

RETijRfJ 

3060 

EhTR 

71 

32 

32?32«65<32<65 

32«78i 

73 

73 

?H? 

PFH 

3070 

BRTh 

82 

32 

82! 32? 69? 32 '32 

32!65< 

32 

65?  32 

7Hfi 

RFFi 

3030 

BFITH 

-■i 

!    i 

71.32?65!32?65 

32?73 

73 

78 

799 

REf!    100  STEPS  IN  ¥.mM  HHlK 

3090 

BRTh 

82 

32 

32? 32? 63? 69? 69 

32?32' 

65 

32,32 

300 

FOR  Q=lTiJiiJO 

3100 

BRTR 

3? 

>71 

32?32?32?65?32 

32?  78 

32 

78 

810 

m 

83  i 

TT=TT+Mh();,V) 
bB(H!iY)  =  0 
POKEZfHfitflM) 

m 

© 

ij!yE5+i?o?-i 

[iFTTil 


840  !FTT=61THEH960      iftt=ch.. 

850  REfl    fiEM  PLHCE  FOR  + 

860  S)^=INT(3*RNIi(KN) )-l;REfS 

870  Sy=INT(3*RHlKRN))-l-REri 

380  H=KtSK 

890  '?'=VtSV 

900  lF?!=0ORA=25THENX=K-24*SGfi(SA):R£fi    TfiY 

.,  JHE«>i=H-S;s 
910  !FV=0ORV=25THENV=i-24*S6N(St);REH     fRY 

, . ,THFNY=Y-SY 
920  i30SLiB250 
930  POKE?? 43 
950  HEKTS 
960  RE'iyR'i 

997  REH 

998  REH 

939  REH     RBJiiST  BRSt  OF  RRKBOil  NLiMEER 

1000  CT=CT+1 

1010  [FCT=100THENCT=-l;SOTOiO?0 

1020  NR=NR+i 

103(1  RN=NR 

1040  !ir=i|iT(iT^lU)+48 

i05ii   IF  hC=43THEN1070 

1060  PuKE0Q+4?flC 

1070  flC=CT-i0*HC^523 

1(180  POKEOO+5?HC 

1090  RETURN 

1097  REH 

1098  REH 

1099  REH     E?«B  RUUTiNE 
iiOO  Y=17 

1110  FiJRK=iTOIB 
1120  G  OS  LIB  250 
1130  P0i(EZ!Ty(;O 
1140  NEKTK 
HFii'i  Frif7=i"ifi-7?hTyiJU 


OSI  Readers 

We're  actively  seeking  short 

basic  routines  and  write-ups, 

Send  them  to 

COMPUTE!  s  OSI  Gazette, 


DISK  DRIVE  WOES? 
PRINTER  INTERACTION? 
MEMORY  LOSS? 
ERRATIC  OPERATION? 

Don't  wt;\  ^^^  so 

Blame  The 
Software! 

Power  Line  Spikes,  Surges  &  p^,  „  259.705   ^P^^  '^°'^ 

Hash  couid  be  tlie  culprit! 

Floppies,  printers,  memory  &  processor  oiten  interact!  Our 
patented  ISOLATORS  eliminate  equipment  tnteraclion  AND  curb 
damaging  Power  Line  Spikes,  Surges  and  Hash. 

•  ISOLATOR  (ISOD  3  lilter  isolaled  3-prong  sockets;  Integral 
SurqelSpIke  Suppression;  1875  W  Maximum  load,  1  KW  load  any 
soctet     S62.95 

•  ISOLATOR  (ISO-2)  2  filter  Isolated  3-prong  socket  banks:  (6 
sockets  total);  integral  Spike/Surge  Suppression;  1875  W  Max 
load,  1  KW  either  bank SB2.95 

•  SUPER  ISOLATOR  (iSO-3),  similar  to  tSO-1  except  double 
tillering  &  Suppression $94.95 

•  ISOLATOR  (ISO-4).  similar  to  ISO-1  except  unit  has  6 
individually  filtered  sockets S106,95 

•  SUPER  ISOLATOR  (ISO-11)  similar  to  ISO-2  except  double 
lillering  &  Suppression  - $94,95 

•  CIRCUIT  BREAKER,  any  model  (add-CB) Add  S  8.00 

•  CKT  BRKR/SWITCH/PILOT  (CBS) Add  516,00 

AT  YOUH  Master-Card,  Visa,  American  Express 

DEALERS  Order  Toil  Free  1-800-225.4876 

(except  AK,  HI,  PR  &  Canada) 


/S^BIectronic  Specialists,  Inc. 

171  South  Main  Sireel,  Nalick.  Mass.  01760 

Technical  &  Non  800;  1-617-655-1532 
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Saving 
Machine 
Language 
Programs  On 
PET  Tape 
Headers 

Louis  F,  Sander 
Pittsburgh,  PA 

This  article  describes  a  simple  method  of  using 
your  old  ROM  PKT  to  write  a  brief  nuu  hine 
language  program  (MLP)  onto  ihc  lieadei-  of  -duy 
PET  program  tape,  where  it  will  automaticallv 
LOAD  right  along  with  the  oilier  program  on  the 
tape.  The  method  described  is  the  only  wa)'  we 
know  to  use  the  first  cassette  bulTer  with  a  program 
loaded  from  TAPE  #1,  short  of  pulling  a  progiam 
in  there  aflcr  the  LOAD.  The  only  restriction  on 
the  MLP  is  that  it  cannot  exceed  1 7 1  bytes  in 
length,  but  there's  a  wav  to  expand  this  limit 
to  187. 

After  loading,  the  MLP  will  reside  in  (he  1st 
cassette  buffer,  where  it  will  not  restrict  the  use  of 
the  other  btiffer  or  the  user  program  area.  Of 
course  the  MLP  will  be  remo\'ed  from  memory, 
but  not  from  the  ta|jc  header,  if  the  1st  cassette  is 
subsequently  used  to  LOAD.  SAVE,  or  VERIFY, 
since  those  actions  write  into  the  1st  cassette  l)uffer. 
For  the  same  reasons,  the  MLP  cannot  be  SA\Td 
again  itself  using  normal  procedures. 

I  have  used  this  method  to  couple  a  joystick 
handler  to  a  B.ASICl  game  prograiu,  and  to  load  a 
liny  machine  language  mcjinitor- along  widi  a 
program  underdevelopment.  It  coukl  easily  be 
used  in  a  program  jirotection  system,  and  the 
creative  programmer  can  no  doubt  find  many 
other  uses  for  it.  To  see  this  wonflcr  in  action,  first 
write  a  machine  language  progiam  (hat  is  no 
longer  than  171  bytes,  and  which  will  ultimately 
reside  in  locations  ()28F-0339  hex,  (G55-825 


decimal),  of  your  old  ROM  PET.  Be  careful, 
becau.se  you  arc  writing  a  program  in  ;ni  area  of 
memory  that  is  wijx'd  out  whenever  I.XPE  #1  is 
used.  When  you  are  ready  to  jnu  your  MI,P  onto 
the  header  of  a  program  tape,  use  a  machine 
language  monitor,  BASK"  POKEs,  or  any  other 
method  to  perform  the  steps  below: 

1.  Put  your  MLP  temporarily  into  locations 
starting  at  ():MF,  (847).  If  you  run  past  location 
03F9,  (1017  decimal),  your  MLP  is  too  long. 

2.  Put  ASCII  spaces  into  all  memory  locations 
between  the  end  of  your  MLP  and  load  ion  ().3E9, 
(1017),  inclusive.  The  space  character  is  a  20  hex, 
or  a  32  decimal. 

3.  Using  the  appropriate  ASCII  codes  for  the 
name  of  the  main  program  to  be  SAVEd,  1(3 
characters  maximum,  put  the  program  name  into 
locations  033F-03-1E,  (8:^1-846  decimal).  Fill  any 
unu.sed  locations  in  this  range  with  AS(  ill  spaces, 
just  as  in  step  2.  Note  that  the  name  here  is  not  the 
name  of  your  new  little  MLP,  but  the  name  of  the 
main  program  you'll  !)e  saving. 

4.  Using  normal  procedures,  LO.M)  oi  key 
in  tlie  main  program  to  be  saved.  \'ou  (an  change 
the  program  once  it  has  loaded,  for  instance  if 
you  want  to  add  some  SYS  calls  to  access  your 
little  MLP. 

5.  If  your  main  ]jrograni  is  in  mat  liine  lan- 
guage, this  step  is  required  uiih'ss  the  main  program 
was  loaded  from  tape  and  still  has  the  same  starting 
and  ending  addresses:  Put  the  nrain  ])r;)gram's 
startmg  address,  in  1(3  byte,  hi  byle  order,  iiUo 
00F7-00F8  hex,  and  put  its  ending  address  plus 
one,  in  the  same  order,  into  OOE.'i-OOEO. 

6.  In  direct  mode,  POKE  249,(53  :  POKE 
250,3  :  POKE  238.187 

7.  PEEK  to  see  (hat  your  POKES  were  suc- 
cessful and  accurate. 

8.  Get  the  cassette  you  arc  going  to  S.WE 
onto,  and  put  it  into  T.APE  #  I . 

9.  In  direct  mode,  type  SYS  63 135  if  your 
main  program  is  in  BASIC,  or  S^'S  (13153  if  voin- 
main  program  is  in  machine  language.  ^Vhen  vou 
hit  RE'l  UR\,  PET  should  initiate  a'SAVE,  with 
the  normal  messages,  but  with  some  additional 
garbage  after  the  program  name,   fhe  ;.;arhage  is 
your  little  MLP,  and  this  is  the  last  lime  vou'll  ever 
see  it  in  this  form. 

10.  VERIFY  what  you  saved. 

1 1.  You  can  now  LOAD  and  use  this  tape  in 
the  normal  way.  (Momentarily  power  down  if  you 
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-  LOW  COST  FLOPPY  DISK  FOR  PET  ! 


[     P)[naiSK  1 1     i 


WHY  PEDISK? 

FAST  -  The  Pedisk  system  loads  directly  to  main  memory  from  the  disk 

and  loads  -  saves  information  at  least  3  times  faster  than  any  other  disk 

available. 

SIMPLE  -  A  simple  command  syntax  makes  its  BASIC  commands  easy  to 

use.  At  the  same  time,  its  sophisticated  indexed,  sequential,  or  relative  file 

handling  makes  it  powerful. 

RELIABLE  -  The  ultra-simple  circuit  design  with  its  LSI  disk  controller 

chip  provides  maximum  timing  margins  for  error  free  operation. 


5%"  system  -  1  drive,  double  density  (143K)  $595.00 

5%"  system  -  1  drive,  quad  density  (286K)   $795.00 

8"     system  -  1  drive,  IBM  3740  business  (295K)  ...$1,295.00 


Introducing  PEDISK  II,  a  low  cost  high  performance  floppy  disk  system 
consisting  of:  1>  PEDISK  II  controller,  3)  flat  disk  cable,  3)  Disk  Drive 
Assembly,  and  4)  PDOS  II  software.  The  PEDISK  II  is  a  full  function 
peripheral  that  provides  high  speed  program  storage  and  a  sophisticated 
file  handling  package. 

The  small  PEDISK  II  controller  board  mounts  inside  any  2000,  4000,  or 
8000  series  machine.  Standard  systems  are  available  with  one  or  two  disk 
drives.  An  optional  third  drive  can  also  be  added.  The  PEDISK  II  System 
can  be  operated  simultaneously  with  any  Commodore  disk  system  for  data 
exchange  purposes. 

The  PDOS  II  software  links  BASIC  by  adding  a  new  repertoire  of  disk 
commands.  lOPEN,  ICLOSE,  IINPUT,  and  IPR1NT  provide  the  basis  of 
the  powerful  file  handling  package.  ILOAD,  ISAVE  and  IRUIM  allow 
complete  disk  control.  PDOS  li  also  offers  a  full  DOS-mode  of  operation 
for  all  disk  diagnostic  and  utility  functions.  Diskette  format,  backup, 
diagnostic,  and  reorganization  capabilities  are  provided. 


2  drives,  double  density  (286K) $945.00 

2  drives,  quad  density  (572K)  $1,195.00 

2  drives,  IBIVl  3740  business  (590K)  ...$1,895.00 


PEDISK  II  CONTROLLER  BOARD 


NEW    -    SPACEMAKER    II      switch  between  one  of  four  ROMS 


SPACEMAKER  M  is  the  new  ROM  switch  from  Microtech.  It  allows  either 
manual  or  software  controlled  switching  of  up  to  four  ROMs  in  a  single 
ROM  expansion  socket.  The  switching  is  accomplished  with  a  side-mounted 
slide  switch  or  via  ROMDRIVER,  an  accessory  board  which  allows  soft- 
ware controlled  switching  and  keyboard  controlled  switching.  ROM  I/O  is 
a  special  software  package  available  on  disk  to  implement  full  keyboard 
control  of  the  ROMs.  In  addition,  it  adjusts  for  memory  difterences  found 
in  various  utility  ROMs. 


SPACEMAKER  II     $39.00 

ROMDRIVER  ■ $39.00 

ROM  I/O  Comnnociore  or  Pedisk    S  9.95 


SEE  YOUR  LOCAL  DEALER  FOR  ALL  cgrs  MICROTECH  PRODUCTS 
IVIICROTECHl 


P.O.  BOX  102,  LANGHORNE,  PA.  19047 

*PET  IS  A  TRADEMARK  OF  COMMODORE 
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want  to  try  it  now).  Ever  y  lime  you  LOAD  it,  your 
MLP  will  be  sitting  at  028F  hex,  where  it  can  be 
called  from  BASIC  by  a  simple  SYS  655. 

Neat,  isn't  it?  Here's  how  it  works.  When  a 
program  SAVE  is  initiated,  PET  makes  up  a  192- 
byte  header  to  record  ahead  of  tlie  program.  The 
header  contains  the  following  data,  from  start  to 
finish: 

•  One  byte,  a  01 ,  which  identifies  the  tape  as  a 
program,  not  a  data  file. 

•  Two  bytes  showing  the  first  memory  location 
the  program  is  to  be  stored  in. 

•  Two  bytes  showing  the  last  memory  location 
the  program  will  take  up,  plus  one. 

•  Sixteen  bytes  of  program  name  that  will 
print  onto  the  screen  dining  searches. 

•  Another  171  bytes  of  program  name  that 
PET  will  look  at  and  compare  to  while  search- 
ing, but  which  won't  usually  print  onto  the 
screen. 

If  the  program  name  is  less  than  16  +  171,  or 
187  characters,  which  most  of  them  are,  PET  fills 
out  the  187  bytes  with  spaces. 

To  make  up  the  header,  PET  has  to  locate  the 
program  name,  which  is  stored  somewheie  in 
memory.  Locations  249  and  250  decimal  specify 
the  location  of  the  first  character  of  the  program 
name,  and  location  238  specifies  its  length.  Nor- 
mally, the  contents  of  these  locations  are  set  during 
the  SAVE  dialogue  between  you  and  the  screen, 
•but  our  three  POKES  circumvent  this.  They  tell 
PET  that  a  187  character  "program  name"  will  be 
found  beginning  at  033F,  (831  decimal).  Our 
previous  steps  have  set  this  bogus  "program  name" 
to  a  sixteen-character  real  program  name  including 
trailing  spaces,  plus  our  MLP,  plus  the  expected 
trailing  spaces  in  unused  bytes.  We  had  to  put  our 
187  bytes  outside  the  1st  cassette  buffer,  because 
the  SAVE  in  Step  9  clears  that  buffer  out. 

Our  SYS  631 XX  tells  PET  to  start  recording 
the  header,  including  the  bogus  program  name, 
followed  by  the  main  program.  Little  does  PET 
know  or  care  that  the  final  1 7 1  characters  in  its 
"program  name"  include  our  MLP.  (The  extra 
steps  and  different  SYS  for  the  machine  language 
main  program  are  required  because  PET  SAV^Es 
BASIC  and  Machine  Language  in  slightly  different 
ways.) 

When  our  specially  prepared  tape  is  LOADed, 
all  the  bytes  from  the  header  arc  deposited  in  the 
1st  cassette  buffer.  PET  uses  the  first  five  bytes  for 
directions  on  where  to  store  the  main  program.  It 
routes  the  next  16  bytes  to  the  .screen  to  tell  us 
what  program  it  FOUND,  and  it  all  but  ignoies  the 
rest  of  the  bytes  that  were  read  in  from  the  header. 
But  when  we  later  call  on  them  as  a  MLP,  PET  can 
execute  them  just  like  any  other  machine  language 
code. 


That's  all  there  is  to  it.  But  what  if  we  need  a 
longer  MLP?  Where  there's  a  will,  there's  a  way.  In 
the  earlier  detailed  instructions,  we  limited  our- 
selves to  a  171-byte  MLP.  By  using  the  method 
described,  we  retained  the  nicety  of  a  !()  character 
real  program  name.  If  we  are  willing  to  give  up 


Little  does  PET  know 

or  core  that  ttie  f  inoi 

171  ctioracters  in  its 

"program  name"  include  our 

macliine  language  program. 


some  or  all  of  these  characters,  we  can  start  oiu" 
temporary  storage  area  a  little  lower  in  the  second 
cassette  buffer,  change  the  value  of  our  POKEs 
and  the  SYS  we  use  to  call  our  MLP,  and  put  up  to 
187  bytes  of  MLP  on  that  header.  The  first  16 
characters  will  still  print  on  the  screen,  although 
since  they  make  up  part  of  a  MLP  rather  than  a 
"name",  they'll  print  some  strange  characters.  The 
basic  idea  is  given  here;  the  calculations  are  left  up 
to  you,  as  is  finding  the  way  to  irse  this  whole 
method  with  the  second  cassette  buffer.  C 


6502 
MACRO  ASSEMBLER 

AND  TEXT  EDITOR 


Versions  for  PET,  APPLE  II,  SYM,  KIM 
and  ATAR  I  ( 1st  quarter  1980) 
Written  entirely  in  machine  language 
Occupies  8K  of  memory  starting  at  $2000  — 
Apple  version  with  disk  occupies  just  over 
9K 

Macro  and  conditional  assembly 
36  error  codes,  26  commands,  22  pseudo  ops 
Labels  up  to  10  characters 
Auto  line  numbering  and  renumber  com- 
mand 

String  search  and  string  search  and  replace 
Copy,  move,  delete,  load,  save,  and  append 
commands 


Cassette  and  Manual  $49.95    MasterCard; 


(including  U.  S.  postage) 


(Atari  Version  with  Monitor  $53.95) 

Eastern  House  Soft^  are 


3239  Linda  Dr. 


Winston- SaJem,  N.  C.  27106 
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IEEE-488  BUS 

SYSTEM  BUILDING  BLOCKS 

For  Commodore  PET/CBM  and  other  computers. 


TNW-2000 


TNW-1000  Seriallnterface:  $129 
TNW-2000    Serial  Interface:  $229 
TNW-232D  Dual  Serial  Interface:  $369 


TN W-1  03       Telephone  Modem:  $389 

A;'o  d'lSA'"    .li,T:i.j.ll    Usi'  Aifi  DAA 

^%^^^^^»»#Jfc    ^>C    PTERM:  A  p(og'afT>  ("at  tu'is  yojf  PET  inmalerminai 

^Ilp     I    VV/\Kt  Use  A.ih  TNWiOm.  TWW-232D.  or  TNW  1031 

SWAP:  A:lDws  stoiagc  oi  up  10  S  programs  m  PET 

memory  al  once  Run  triem  tri  any  orae' 

PAN:  A  soph»slir.alo.!  c^oc^^onlC  man  prograrr^ 

use  wrih  TNW  1031 

Write  or  call  lor  information  today: 

TNW  Corporation 
3351  Haricock  Street 
San  Diego  CA  92110 

(714)  225-1040 


PLUS  Most  popular  ; 
disks,  primers  e'c 


P  =  mom^eirifiM  PET  Products 
■  from 

OPTIMIZED  DATA  SVSTEHIISI 


-SOFTWARE    FOR   ALL  PET/CBMs- 
(Supplied  on  Cassette-Prices  include  Shipping) 

WORD  PROCESSOR  IPS001I S16.9S 

Makes  documents  a  tnap 
MAILING  LIST  (PS-0021 $16.95 

Throw  awav  your  addresi  t)O0k 
SPACE  EATER  (PS0031 S9.95 

Gobbles  spaces  in  BASIC  programs 
CATALOG  (PS-0041 S16.95 

File  stamp/CDin/elc,  collecsions 
SATELLITE  TRACKER  (PS-0051 S24.95 

Tracks  OSCAR  Ham  Salellite  in  real  lime 
MORSE  CODE  KEYER  (PS-OOB) $14.95 

Sends  code  on  the  air  or  (or  practice 
MINICOUNTT  "   IPS007) $19.95 

Measures  trequcncy  to  17KH?  and  inte»vali  to  65  msec 

-HARDWARE  FOR  "OLD"  8K  PETS- 
(Shipping  Additional) 

2114  RAM  ADAPTER (+  S1.50  per  order! 

Replaces  up  to  6-G550s  with  low  cost,  reliable  21 14s 


/. 


.$8.95 


PHK-001  (Kit-2  sockets!  . 
PHK-001S  IKit-«  sockets) 


S13.95 
$16.25 


PHB-001  IBare  PCB)  ,  . 
PH001S  (Asim. sockets 

onlvl S22.9S 

PH<I01  (Assm -2  sockets  +  one  2114! $24.95 


4K  MEMORY  EXPANSION 

Installs  easily  internally.  Uses  21 14s.  Write  Protect. 


.  (+  $3  per  order) 


PHB-002(Bare  PCB)  .  .  -  .$16 
PH-002S  (Assm-sockets 

onty) $42 


PHK  002  IKitsocketsonly) $29 

PH^)02  (Full  Assml -  $105 


PROMPT  SHIPMENT!  <:  aticc  ai-tii-im  <-i  ia  d  nnTci:rs 

Calit.  Residents,  add  6%  TaK  SATISFACTION  GUARANTEED 

P.O.  Box  595,  Dept.  C  -  Placentia,  California  92670 


MINI-COUNT  Trademark  ol  Ophmirad  Dala  Sv^ems 
PET/CBM  TradBmark  of  Commodar*  BiKinau  Machine^ 


Every  PET" 
Needs  a  Friend. 


CURSOR  is  the  best  friend  your  CommocJore  PET  will  ever 
fiave.  Since  July,  1978  we  have  publi5fied  T50  of  the  most 
user-friendly  programs  for  the  PET  available  anywhere. 
When  we  write  or  edit  a  program,  we  spend  lots  of  time 
fussing  about  how  it  will  treat  you.  We  pay  attention  to  lots 
of  little  things  that  help  make  using  a  computer  a  pleasure 
instead  of  a  pain. 

Naturally,  CURSOR  programs  are  technically  excellent. 
Each  program  that  we  purchase  is  extensively  edited  or  re- 
written by  a  professional  programmer.  But  imagination  is 
just  as  important  as  being  user-friendly  and  technically 
good!  We  delight  in  bringing  you  off-beat,  unusual 
programs  that  "show  off"  the  abilities  of  your  PET  or  CBM. 
CURSOR  is  user-friendly,  technically  great  and  full  of 
imaginative  programs.  And  every  issue  of  CURSOR  is  still 
available!  We  continue  to  upgrade  previously  published 
programs  so  that  they'll  work  on  the  three  varieties  of 
Commodore  ROM's  (Old,  New,  and  4.0).  New  issues  also 
work  on  the  80  column  CBM. 

For  only  S4.95  you  can  buy  a  sample  issue  and  judge  for 
yourself.  Or  send  S27  for  a  six-issue  subscription.  Each 
CURSOR  comes  to  you  as  a  C-30  cassette  with  five 
programs  and  a  graphic  Front  Cover,  ready  to  LOAD  and 
RUN  on  your  PET. 

Who  knows?  After  your  PET  meets  CURSOR,  things  may 
never  be  the  same! 


Published  By: 


Diijnbulpri  by: 
AUDIOCEhJIC  Ltd. 
P.  O.  Box  68 
Reading.  Berkshire 

SYSTEMS  FORMULATE  Corp. 
Sliin-Makicho  BIdg.,  1-8-17 
Yaeiu.  Chuo-Ku.  Tolsyo  103 


theCODE 
WORKS 


Box  550 

Goleta,  CA  93116 
805-683-1585 
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Commodore 
ROM  Systems: 
Terminology 

Jim  Butterfieid 
Toronto,  Canada 

The  first  PET  ROMs  didn't  seem  to  have  a  name. 
They  were  jusl  the  PET  ROMs.  Usei  s  perceived 
different  types  of  ROM  sets:  some  had  28  pins 
each  and  were  mamifaciured  In  MOS  Teclniology, 
a  Commodore  siilxsidiary;  otiiers  had  24  pins  and 
were  made  by  outside  suppliers.  Then  there  was  a 
bug  replacement:  early  ROMs  numbered  either 
6540-0 II  or  9()I447-0'l  wer-e  changed  for  corrected 
ROM  systems. 

This  fnsl  ROM  system  ua.s  internally  called 
Basic  1.0  by  Commodore.  L'nfortimalely,  the  Basic 
language  itself  is  called  Basic  Level  2. 

A  year  latei',  another  ROM  set  arrived  which 
once  again  IkkI  no  name.  Dealers  and  users  just 
called  them  "new  ROMs"  since  that's  what  tJiey 
were  at  the  time.  Unfortunately,  new  ROMs  aren't 
new  any  more,  and  calling  them  b\-  that  name 
confuses  newcomers. 

This  second  system  was  called  Basic  2.0  l)y 
Commodore.  Antl  naturally,  the  Basic  was  called 
Basic  Level  3.  I4ie  numbers  were  generally  used 
only  within  Commodore  so  that  users  weren't 
exposed  to  the  confusion.  How  the  Commodore 
people  sorted  it  out,  I  can't  guess. 

Finally,  Basic  4.0  was  released,  and  at  this 
point  the  two  lunnbcr  systems  caught  up  to  each 
other.  The  machine  prints  COMMODORE  BASIC 
4.0  upon  power-up,  so  that  everyone  knows  whal 
niunber  belongs  to  this  ROM  set.  Finalh-. 

What  happened  to  the  mi.s.sing  number? 
Nobody  seems  lo  know.  My  tlieory  is  this:  that 
Commodore  internally  called  their  fiist  Basic  "  1 .0 
ROMs"  for  the  obvious  reason.  In  the  meantime, 
C'ommodorc  sales  may  have  become  concerned  by 
compLuisoirs  to  Radio  Shack  Level  I  Basic  (a  fairly 
primiti\e  version  of  Basic)  and  decided  to  start 
their  numberingat  Level  IL  .-\t  that  point,  I  sm-mise. 
they  were  stuck,  aiul  the  producdon  2.0  ROMs  had 
to  be  called  Level  3.  during  this  period  of  lime,  tlie 
nmnber  you  got  depended  on  the  departmeiu 
within  Commodore  that  you  were  talking  to. 
Finally,  the  production  people  must  have  decided 
that  if  they  skipped  a  number  everybody  would  be 
caught  up.  I'liev  were  right:  we  all  agree  on  what 
Basic  4.0  is,  even  though  we're  still  cloudy  on 
wliich  one  should  be  called  Basic  2... 

A  proposed  standard. 

Let  us  call  the  lirst  RONL  whatever  its  number: 


Original  ROM.  fhats  the  ROM  without  a  Machine 
Language  Monitor;  that  can't  handle  IEEE  disk; 
thai  has  a  limit  of  256  elements  in  an  array,  and 
that  lias  some  minor  tape  irregularities,  \fany 
users  will  have  upgraded  their  systenrs,  but  there 
are  still  a  lot  of  the  Original  ROMs  around,  and 
writers  foi*  COMPUTE!  should  he  spedfif  if  their 
programs  will  work  only  on  the  more  recent 
machines. 

The  next  ROM  sliould  be  called  I  pgrade 
ROM.  That's  the  RO.M  with  a  Machine  Language 
Monitor  and  other  improvements,  but  without  ihe 
speeded  garbage  collection  routines  and  without 
the  extra  disk  connnands  such  as  DLO  \D  or 
SCRATCH. 

Subse{]uent  Basil  ROMs  may  be  called  by  theii- 
number:  al  the  moment,  Basic  4.0  is  the  only  one 
oiu,  but  there's  a  5.0  rumored  for  the  near  futuie. 

Within  these  various  styles  of  Basic ,  there  are  a 


We  all  agree  on  whait 

Basic  4.0  is,  even  though 

we're  still  cloudy  oni 

which  one  should  be 

called  Basic  2... 


few  small  variations  which  may  or  may  not  be 
significant  to  the  reader.  Some  machines  have 
graphic  keyboards  and  others  have  full  \SCII 
keyboards;  there  are  minor  changes  in  ROMs  to 
accomodate  the  particular  keyboard  used.  More 
significantly,  an  article  which  asks  a  user  to  press 
the  FAB  key  may  not  be  too  helpful  to  a  user  who 
doesn't  have  such  a  key  on  his  computer. 

Similarly,  there's  a  \isible  difference  between 
40-colinnn  and  8()-coUunn  FET/CBM  (  omputers, 
and  there  are  small  ROM  differences  I  xtween  the 
two  types  of  macliine.  .S<jme  programs  will  rim 
splendidly  on  both  ty[:)es  of  machine:  hut  if  your 
program  doesn't,  it's  a  good  idea  to  specily  the 
machine  (or  which  the  program  is  written. 

Hardware  Differences 

I  he  RO.M  sei  doesn't  alwavs  cories[)on(l  exactly 
with  the  physical  configination  oi  the  machine. 
Original  small-keyboard  PE  Is  can  be  fitted  with 
upgrade  ROM  ...  and  can  even  be  filie*:l  with  targe 
keyboards,  which  makes  them  hartl  lo  recognize. 
Similarly,  a  green  screen  isn't  always  a  guarantee 
thai  the  machine  is  of  more  recent  vintage;  and 
subsequent  PETs  have  gone  through  more  than 
one  board  redesign. 

The  most  signilicanl  hardware  change  seems 
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FREE 

PET/CBM 
COM^L 


"The  excitement  in  Europe  (over  COIMAL) 
seems  to  be  growing  by  the  hour  and  we  iook 
forward  to  America  being  abie  to  share  in  the 
good  fortune  of  having  an  easy-to-use,  struc- 
tured, pEanning  ianguage  at  last." 

The  power  of  PASCAL  and  the  ease  of  BASIC 
can  now  be  yours  with  Commodore  COMAL,  a 
new  programming  language  from  DENMARK.  It 
is  being  distributed  in  the  USA  by  the  COMAL 
USERS  GROUP.  To  find  out  more  about  COMAL 
and  how  you  can  get  a  free  disk  copy  of  Com- 
modore COMAL,  send  a  large  self-addressed 
stamped  (35  cents)  envelope  to: 

COMAL  USERS  GROUP 

5501  GROVELAND  TER.,  MADISON.  Wl  53716. 

Outside  USA  please  add  $2,00  for  airmal  and  handling. 

•PET  &  CBM  are  irademarks  of  Commodore  Business  Machines 


PET'  MACHINE  LANGUAGE  GUIDE 


Ctmterxts  inf.iud*-  Sdf.titiin  un: 

*  inpLiI  and  fjillput  f  i^ulinc;^. 

*  I  ixed  point,  riodiintj  potnl, 
.l^ld  Avfii  niimbfr  tr>nvf:rsK>ii 

•CKicki  and  iKiiers. 

•Uuill-in  anthinctic   lunrlion^. 

*  J^EijgrdnuTtiiiq  iiir^t^  and  ^1191^0% 
tjons. 

•Marty  SiJiTiple  pfi}9rdrTT&. 

Whilo  supply  lasts: 

Guidiis  lor  Old  ROMS 

only  $5,00  mc  postage 

New  ROMS  order  below 


If  vou  ^^^  interested  in  or  are  already  into  machine  language 
programming  on  the  PET,  then  this  invaluable  guide    is  for 
you     More  than  30  of  the  PliT's  built  in  routines  are  fully 
detailed  so  that  the  reader  c<in  immediately  P"'  ihem  to  good 
use. 

Avaclable  for  SG.95  *  .75  postage.  Michigan  residents  please 
include  4%  state  salei  tax.  VISA  and  Masterchafge  Mrds 
accepted  ■  give  card  numlwr  and  expirafion  date  Quantity 
discounts  are  available. 


ttttt***»f I 

liiiiii!^' 
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ABACUS  SOFTWARE 

P.O.  Box  7211 

Grand  Rapids,  Michigan  49510 

(616)241-5510 


PET  ft  APPLE  It  USERS 

Tiny  Pascal 

Plot  + 
QRAPHICS 


The  TINY  Pascal  Syatsm  tuma  your  APPLE  II  or  PET  micro  Inio  a  IS-blt  P-m*chlne. 
You  loG  can  iBam  tha  lafiguAQe  triat  l«  Bialed  to  bttcoma  lh«  auccsaaor  to  BASIC 
TINY  Pauai  oflvrg  th«  following: 

"   LINE  EDITOR  ID  Cl*al*,  modl^r  and  milnlain  sourc* 

-  COMPILER  lo  prcducB  P-coda.  tha  itiarnbly  lanQSUtQ*  Of  th«  P-TTMCNna 

-  INTERPRETER  to  txKuta  th*  Cf:>mpil»d  P-cod*  (hMt  TRACE) 

-  SifUCturM  programmad  ccmitrueit:  CASE-OF  ELSE,  WHILE-00,  IF^THEH- 
ELSE.  REPEAT-UNTEU  FORT0(DOWNTO-OO,  BEQIN-EHQ,  UEU.  CONST, 
VAn  ARRAY 

Oji  new  TINY  Pa.9ca<  PLUS-»-  provides  graphics  anfl  ott^er  builtin  functions; 
GRAPHICS.  PLOT.  POlNt.  TEXT.  INKEV.  ABS  AND  SQR  Tho  PET  varsion  sup- 
pona  doublfl  danslly  plotting  on  40  column  scraan  giving  80  x  50  plot  paaitions 
Ttia  APPLE  II  varslor  upporla  LOflES  and  for  ROM  APPLESOFT  ownars  tha 
HIRES  grApnica  plul  aihai  raaruran  wim  COLOR.  HGRAPHIC5,  HCOLO^. 
hPlOT.  PDL  and  TONE,  For  ihoM  wfio  do  nol  raqulra  grap'^ilci  capAlUlllloa.  ^ou 
may  3tiil  Drder  oji  oiiQinai  Tiny  Paacal  package. 

PET  BA3IC  4.0  veraion  also  available 

TINY  Paacar  PLUS*  QRAPHICS  VERSION-  

PET32K  NEW  RomscasMttB JK 

PFT3JK  NEW  Horns  diskatle ..%50 

APPLE  II  32K/iBKwyDOS  3.2  0*3.3 .SSO 

TINY  Paical  NON-QRAPHICS  VERSJOHS-  [  ^ 

PET  16K;32K  NEW  Roma  cB»Mtl8..., $40 

PET  ;6K/32K  NEW  Roma  diaholio ..,,.,...$35 

APPLE  II  *mOM  Applesafl  32K  *r/[>OS S35 

APPLE  tl  */RAM  Apple»oh  WKw/DOS tag 

USER'3  Manual  (ralundablv  with  soFlwara  order). .  S10  l/j^.jr 

fiSOZ  AssamDI^  Listing  ot  INTERPRETER-graphJca t»  VljA 

eSOZAsssmbljf  Listing  of  INTEHPRETER-non  grapt^fca.  .120 

"M"**  Hc  ■■■■■lan  Mi^i  M-iMovi  'i>  nam  mchd*  4*  atm^  mh  ui  CMm*  k 

IMII»II!!!ll  ABACUS  SOFTWARE 

P.O.  Box  7211 

Grand  Rapids.  Michigan  49510 

(616)241-5510 
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INTERACTIVE  GRAPHICSJGAME  LANGUAGE 

FOR  THE  PET/CBM 

VIGIL      IS      &ri      exciting      new      interactive      language      tor     your 
PET(CBM       micro.      VIGIL      ■       Video      Interaciive      Game 
Interpretive     Language     -    is     an    easy     lo     learn    Qraphic5     and 
flame       lanQuage      thai      lets      you      quicltly      create      interactive 
applications. 

•  More  Itian  60  powerful  commands  permit  ynu  to  easily  manipui^ale  graphics 
figures  on  the  screen 

•  Double  density  grap^fiics  give  you  BO  X  50  plot  positions  on  your  40  column 
PET/CBM 

•  Large  number  display  caBabiliiy.  access  to  two  event  timers  ana  tone  generation 
(it  you  have  ext   speakeri 

■    Load  and  save  your  VIGIL  proflfams  la  cassette  or  dtskette 

•  Nine  interaclwe  programs  demonsifaie  itie  powe^  ot  ViGiL    Breakout. 
SpaceWar.AnliAircratl,  U.F  O  .  SpaceBaitle.  Concentr3iiof\.  Maze   Kaleidoscope 
4  Fortune 

•  Comprenensive    users    manual     wiiti    complete    iistinfls    of 
enclosed  programs 

VIGIL     comes     on     cassette,  or  diskeite  ready  to    run  on  any  40  column 
PET/CBM     micro     with     at     least     8K     of    memory      Specify     ROM-set 
when      ordering       6502      iisting      of      the     VIGIL      Intefpreiet 
available  separately  ^^  ^  ^-g^^^^g  FoisiQtx 

VIGIL  FOR  f*elCBM  on  Cassewe  or  Diskette  (w'9  programs)  -  S35  t^O 

VIGIL  Users  Wannual  (refundable  with  software!  S'O Jt^ 

VIGIL  Interpreter  li&iing  (6&Q2  Assembly  language)' MS S30 

PET  MACHINE  LANGUAGE  GUIDE  M. 


limin;£!i1  abacus  software 

"^^  ^   *^***n   p  0.80x7211 

GraticI  Rapids.  Michigan  49510 
(616)241-5510 


mmi 


Prices  include  postage  Micfiigan  residents  include  A%  sales  tax  Orders  must  be 
prepaid  or  via  bankcard  (Mastercard,  VISA,  Emrocard.  Access,  etc.)  Include  card 
number  and  enpiraiion  date 

(CJ  19B1  by  Boy  Wairiwrigtit 
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to  be  from  the  original  PE 1"  —  which  can  be  spotted 
by  its  memory  expansion  edge  connector,  and  by 
its  screen  noise  when  a  screen  POKE  is  performed. 
Subsequent  models  have  expansion  pins  (not  an 
edge  connector)  and  a  hash-free  screen. 

There  are  other  architectural  differences,  the 
wide  80-colunin  screen  being  the  most  obvious. 
Some  of  the  changes  are  important  in  a  negative 
way:  for  example,  the  "speedup"  achieved  on  some 
computers  by  poking  address  59458  is  to  be  avoided 
since  it  can  cause  chip  damage  on  certain  models. 

Generally,  programs  which  behave  differently 


...if  (your  program's)  going  to 

go  elsewhere,  fry  fo 

spof  any  signs  of 

travel  sickness  in  advance. 


in  different  hardware  (as  opposed  to  different 
ROM  sets)  are  unusual.  If  there's  a  good  reason  for 
such  behaviour,  it  should  be  documented  ...  the 
more  explanations,  the  better. 

Disk  ROMs 

We  seem  to  have  more  consistency  in  disk  ROM 
systems.  The  first  2040  ROM  is  usually  called  DOS 
1.0;  units  fitted  with  it  require  initialization  before 
a  diskette  can  be  used.  The  subsequent  ROMs  for 
the  2040  are  DOS  2.0;  they  can  be  quickly  spotted 
by  the  fact  that  the  unit  bumps  the  heads  at  time  of 
power-up.  The  ROMs  currently  fitted  to  the 
Model  8050  disk  are  called  DOS  2.5.  At  the  present 
time,  the  8050  has  only  one  ROM  set,  but  others 
may  emerge.  When  this  happens,  it  may  be  that 
most  programs  will  work  well  on  either  ROM;  but 
of  course,  any  variant  behaviour  should  be  noted. 

Programs  intended  for  DOS  1 .0  systems  must 
initialize  a  diskette  befoie  starting  to  work  on  files; 
the  assumption  is  that  the  data  files  are  likely  to  be 
on  a  different  disk  from  the  program  itself.  If  you 
are  writing  a  program  for  yoin-  own  DOS  2.0  or 
8050  system,  it's  a  good  idea  lo  remember  to 
include  such  an  initialization  even  though  your 
system  doesn't  need  it.  Others  may  find  it  useful. 

If  you  are  working  with  REL  type  files,  it's 
fairly  obvious  that  DOS  1.0  systems  are  not  com- 
patible with  your  program.  Note  it  anyway  in 
your  text;  what's  obvious  to  you  may  not  be  to 
newcomers. 

It  seems  to  be  safe  to  assume  that  a  2.0  DOS, 


which  has  Append  and  Relative  file  features,  will 
always  be  used  with  a  4.0  or  later  Basic  Don't  be 
too  sure.  There  are  plenty  of  users  wh<j  don't  have 
the  option  of  going  to  Basic  4.0.  If  you  write  your 
program  for  Basic  4.0  —  and  it's  usuallv  easiest  for 
you  to  do  it  this  way  —  note  the  fact.  The  Basic  2.0 
user  may  want  lo  take  a  shot  at  converting  your 
program,  but  he  needs  to  be  warned  that  conversion 
is  necessary. 

Machine  Language 

It's  possible  to  write  machine  language  programs 
that  will  run  on  any  PET/CBM  machine.  It  can't  be 
done  every  time,  but  if  you  can  ...  do  it  I  find  it  a 
great  nuisance  to  have  to  keep  copies  of  programs 
suitable  for  Original,  Upgrade  and  4.0  Basic 
ROMs.  The  trick  is  to  use  the  Jump  Table  (Hex- 
adecimal FFCO  to  FFEA)  for  all  input  and  output; 
it's  identical  in  all  PET  ROM  systems  so  that  one 
program  fits  all  machines.  To  repeat:  )()U  can't 
make  your  machine  language  prograuj  ROM-inde- 
pendent in  every  possible  case;  but  it  can  be  done 
surprisingly  often. 

If  your  program  runs  only  on  a  particular 
machine  type,  document  it.  The  same  ground 
rules  apply:  if  the  user  is  cautioned,  he  may  well 
take  a  shot  at  doing  the  conversion  himself.  If  he's 
not  warned,  he  may  spend  a  lot  of  time  tvping  in 
the  program  only  to  find  that  it  doesn'i  work. 
Then  he  may  spend  hours  looking  for  a  transcrip- 
tion error  that  isn't  there. 

Sumnnary 

If  you're  writing  a  program  that  you  think  may  be 
used  on  .somebody  else's  machine,  look  it  over 
carefully  for  com])atibility  problems.  It  doesn't 
matter  whether  you  plan  lo  sell  tlie  program,  give 
it  to  a  friend,  or  publish  it  in  COMPUTE!  —  if  it's 
going  to  go  elsewhere,  try  to  spot  any  signs  of 
travel  sickness  in  advance. 

Of  course,  you  don't  have  every  model  of  PET 
and  every  printer  and  disk  unit  in  yoin  iiomc. 
Obviously,  you  can't  lest  everything  yourself. 

But  learn  a  little  about  compatil>iliiv  between 
machines,  and  you'll  know  where  to  look  for 
potential  trouble.  If  you're  not  sure,  tr)  the 
program  on  a  friend's  machine.  If  you're  still  not 
sure,  add  some  cautionary  sentences  to  vour 
docimientation . 

PET/CBM  maciiines  are  really  highly  compati- 
ble. Learn  how  !o  look  for  the  few  roui^li  spots  and 
your  programs  will  bec(jme  much  mort  widely 
useable. 

And  if  you're  really  not  sure,  appeal  for  help. 
Drop  a  couple  of  REM  statements  in  yoiu-  program 
asking  for  feedback.  Many  usei-s  will  lie  glad  lo 
help  ...  to  lell  you  what  they  needed  to  do  lo  fix 
your  program  lor  their  machine.  Or  betier  yet  ...  to 
tell  you  that  your  program  worked  fine  on  the  first 
try.  © 
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Big  po^ver 
small  package. 

Producis  for  PET/CBM  computers  only^ 


.%.  ^ 


MftCHINE  LFlNGUflGE  UTILITV-PfiC    1.2R 

ROM       BASED     FIRMWRRE   INCLUDES     43     COTIMflNDS     TO 
ENHANCE     USE     OF     VOUR     COMPUTER      INCLUDING  DOS' 
INCLUDES  ASSEMBLER,      DlSSflSSEMBLER.    HUHT  MEMORY, 
QUICK      TRACE,    COMPARE  MEMORV,      TRANSFER     MEMORV, 
RELOCflTOR,      WALK     CODE,      INTEGRATE  MEMORV,    VIDEO 
SCREEN     DUMP     TO  PRINTER   IN  STANDARD  OR   ENHANCED 
FORM,  FILL  MEMORV,  FAST  TVPE  CODE  ENTRV,  HEX  TO 
DECIMAL     AND     ASCII    CONVERSIONS     &     VISE     VERSA! 
MOST  FUNCTIONS  TO  SCREEN  OR  PRINTER.   MAKES 
HANDLING        AND     UNDERSTflNDINO     OF   ^MACHINE     CODE 
PROGRAMMING     EASIER.      ALSO     INCLUDED     RRE     THESE 
PROGRAMS     ACCESSIBLE     FROM   BASIC.      REV.      PRINT   - 
DOS  -  SCREEN  DUMP   -  ENHANCED  SCREEN  DUMP  - 
RE/NEW  -   AUTO     REPEAT   -   DISK  APPEND  -   REV.bUREEN 
-  DISPLflV.   AVAILABLE  FOR  3.0  ROMS  AT  LOCATION 
HEX  «R000,   FOR  4.0  ROMS  AT  HEX  *90CtGi  OR  HEX 
*fi000.    SPECIFY.    MANUAL   INCLUDED.    WE     ACCEPT  VliA 
AND  MASTER-CHARGE.  ORDER  FOR  36  DRV  FREE  TRIAL. 
DOES  NOT   LOWER  USER   MEMORY,    fi  MUST     FOR     NEW     OR 
ADVANCED  PROGRAMMERS  RLIKE! 

4K  ROM  FOR  3.0  CSAOOO)  OR  ($9000)    .  $79.95     S2  S&H 
4K  ROM  FOR  4.0  (SAOOOI  OR  ($9000)    .  $79.95     S2  S&H 


BASIC  UTILITIES  4.0 

THIS  4K  ROM  CONTAINS  13  COMMANDS  FOR  BASIC 
PROGRAMMING.  INCLUDED  ^ARE  RUTO  -  RENUMBER  - 
DELETE  -  FIND  -  APPEND  <TAFE>  -  DUMP  "^HELP  - 
TRACE  -  STEP  -  OFF  -  REV.  PRINT  -  D.O.S,  - 
SCREEN  DUMP  -  ENHANCED  SCREEN  DUMP  -  RE^HEW  - 
AUTO  REPEAT  -  APPEND  <DISK)  -  REV. SCREEN  - 
niSPLAV  MANUAL  INCLUDED.  THIS  ROM  IS  LOuRTED 
AT  HEX  $9000  THESE  PROGRAMS  DO  NOT  LOWER  USER 
AVAILABLE  MEMORV,  &  WILL  GREATLY  ENHANCE  YOUR 
PROGRAMMING   ABILITY! 

4K  ROM   IS »79-95  +  *2  S&H 

2K  ROM  W/FIRST    10  COMMANDS   IS $39.95  +   *2  S&H 

PLEASE  SPECIFY  WHICH  ROM  SET  YOU  HAVE. 


SEND  Si. 00, 
GET  CATALOG 
&  $5.00  OFF 
OF  THE  NEXT 
PURCHASE!  !  ! 


COMPETITIVE 

SOFTWARE 

21650  Maple  Glen  Drive 
Edwardsburg,  MI  49112 


The  $180  Programmable 
character  generator  that 
performs  above  and 
beyond  its  price. 

It's  the  NEW  HAL  PCG  6500  1or  your  PET.  With  HAL, 
you  control  each  dot  in  the  8  x  8  matrix  so  you  get 
sharp,  clear  graphics,  HAL  offers: 


Interface  to  PET/CBM  wilfi 
24  pin  ctiaracter  generator 
ROMS.  (If  your  PET  uses  26 
pin  ROMS.  Conversion  Kits 
are  available  for  S45,  To 
simplify  ordering,  please 
indicate  memory  RAM 
#2114  or  #6550.1 


•  Storage  for  64  user- 
programmable  characters 

•  Built-in  CB2  sound  ampliiier 

•  PCG  Manual  and  demo 
program 

The  HAL  PCG  6500  Is  avail- 
able exclusively  at  Systems 
Formulate... 

Call  today  lor  more  Information  of  to  place  your  phone  order. 
(415)  326-9100    39  Town  &  Country  Village,  Palo  Alto,  CA  94301 
We  honor  Afaiiflr  Charge,  Vita.  Check  or  Money  Order  (Cetllornla  retldgnts 
add  6'A%  salaa  tax) 

Dealer  Inquiries  Invited 


Ly£)  SYSTEMS  FORMULATE  CORPORATION 


PROGRAMS  AVAILABLE  FROM 
COMPUTER  HOUSE  DIV. 

FOR  COHNODORE  AKD  APPLE  COHPUTERS 


ACCOUNTING  SERIES 

—  \/f.  A/R.,  Job  Com  inJ 
Job  EitimAting 

—  Pjyioll 

—  Ch«kwmcr 

—  Inventory 

—  Mailing  List 

ATTORNEYS  SERIES 

—  Legal  Dcmo 

CBM  PROGRAMING  AIDS  SERIES 

—  Docu-Print 

—  F.E.T./ Recover 

—  Scr«n  Dump/Rcprti 

—  Scrunch  Plui 

—  Sof-Bkup 

—  Sorier 

■—  Sufer-Ram 

—  Trace-Print 

—  Van-Print 


DESIGNERS/ EMGtNEERS  SERIES 

—  B«mj 

—  Bolt  Grcle 

—  Machine  Pari  Quoiing 

—  Machine  Pan  Quoting  Demo 

—  Spur  Geaji 

-^  Trig/ CircleT  an  gent 

POLITICAL  SERIES 

—  Politicil  Mitling  Li« 


REAL  ESTATE  SERIES 

—  Lisiings 

*—  Finincial  with 

Record  of  Invntments 

—  Mail/Phonc  LlH 

—  Checkwritcr 


APPLE  PROGRAMING  AIDS  SERIES 

—  Scrunch 


Prttti  6c  ipeciftcationi  lubject  id  cbmge  without  notice,  Non ■disclosure  siatcmcnt  musi  be 
ligned  ind  returned  before  ihipmmt. 

NOTE :      All  oftheu  pr0grimi  tit  menu  driven  and  prompt  the  user.  Prcvioui  cx- 

pefience  it  not  neceuiry,  only  fimilnrity  with  iuhj*rt  mxterial.  InsTruC- 
lioti£  included  with  each  program. 


0£ALE:itS   WANTED 


COMPUTER  HOUSE  DIV. 
FX-C.  INC 


T407  CUKon  Rd. 
Tfllephorw 


Jick»n,  Mich   432ta 
;517!  7B5-213? 


150 


COMPUTE! 


Screener 


July.  1981.  Issue  14 


Four  Screen  Utility 
Routines  For  The  PET 


Ralph  Owens 

The  PET's  cursor  cuiUrois,  lAB,  SPC,  and 
cleai-  screen  functions  are  good,  liul  sonielinies 
they  are  not  good  enougli.  Several  limes  I  have 
wished  for  a  clear,  but  reversed,  screen.  At  times  I 
have  longed  for  a  scroll-right  fealinc  for  some 
neat,  aclion-packed  cartoons. 

Finally  I  decided  to  quit  wishing  and  to  write 
some  screen  routines.  Listing  I  shows  the  results  of 
my  frustrations.  These  are  four  shf)rt,  independent, 
relocatable,  re-entrant,  ROM-independent  .screen 
routines  which  use  the  IK  block  of  .screen  memory 
as  data  for  a  block  action  of  some  type.  Each 
routine  may  be  implemented  alone,  or  all  four  may 
be  placed  in  the  PET  at  one  time.  Each  routine 
uses  one  base  address  for  indiiect  arldressiiig.  This 
is  placefl  into  addresses  0-2  which  have  (in  all 
released  ROM's)  been  reserved  for  the  USR  func- 
tion vector,  and  are  infrequenth-uscd  addresses. 

The  first  routine  moves  everything  on  the 
screen  one  character  to  the  right.  It  starts  in  ibe 
upper  left  corner  and  moves  the  entire  row  light. 
It  repeats  itself  on  the  next  line  for  25  times.  By 
changing  the  starting  address,  the  number  of 
columns  to  move  {in  register  X)  and  the  number  of 


lines  to  move  (in  register  Y),  one  can  make  any 
portion  e)f  the  screen  roll  right. 

The  second  routine  reverses  everything  on  the 
screen.  I  he  trick  here  is  that  it  toggles  the  7th  bit 
of  the  screen  character,  wliich  causes  die  entire 
screen  to  be  the  reverse  of  what  it  was.  The  nielhod 
used  does  not  allow  easy  modification  to  work  on 
only  a  certain  portion  of  the  .screen. 

The  third  rouiine  clears  a  windo\\'  on  the 
screen.  The  base  address  as  shown  in  the  listing  is 
the  memory  address  of  the  upper  left  corner  oYdie 
window.  The  \  register  contains  the  lieighi  of  the 
window.  The  Y  register  contains  the  width  of  the 
window.  In  listing  1,  lines  460  to  490  sliow  how  to 
dynamically  change  llie  position  of  the  window.  If 
you  change  the  lilank  to  a  reversetl  blank  ( 1 60 
instead  of  32)  then  a  reversed  window  will  appear. 
If  you  also  set  the  window  to  include  the  entire 
screen,  then  a  clear,  but  reversed,  screen  will 
result. 

The  foinih  rouiine  is  a  .scroll  dt)wn  routine.  It 
moves  everything  on  the  screen  down  one  line.  By 
changing  the  value  in  the  X  register,  and  the  value 
of  the  counter  at  location  zero,  one  can  get  onlv  a 
portion  of  the  screen  to  scroll  down. 

Pulling  the  two  .scrolling  functions  inside  of 
FOR-NEXT  loops  will  provide  quite  good  anima- 
tion. If  you  ptit  the  leverse  screen  rouiuie  in  a 
FOR-NFX4'loop,  then  a  flashing,  attention-getting 
display  can  be  obtained. 

These  four  routines  are  just  .some  things  that 
I've  wanted  to  do  with  the  .screen.  I  hope  that  you 
can  use  them.  Some  other  ideas  that  I  have  had  are 
to  make  a  .scroll  left  function.  One  could  grab  the 


100  PRIHT-'ITTHIS  PROGRRM   NILL    LOfln  FOUR   SHORT.." 

110   PRIHT"RELOCRTFfELE,.    ROM   IHHEPENDRNT..    MflCHIHE" 

120  PRINT"LflNGUflGE   ROUTINES    INTO  THE  SECOHH" 

130  PRIHT"i::flS.SETTE  BUFFER." 

140  PRINT";?ITHE  FIRST  ROUTINE  WILL  MOVE  EVERV" 

150  PRINT"CHfiRh!CTER  ON  THE  SCREEN  ONE  SPACE  TO" 

160  PR I NT "THE  RIGHT." 

170  PRINT";?TTHE  SECOND  ROUTINE  WILL  REVERSE  EVERV" 

180  PRINT"CHRRhCTER  ON  THE  SCREEN." 

190  PRINT":?TrHE  THIRD  ROUTINE  WILL  CLERR  RNV" 

200  PRINT"SPECIFIED  BLOCK  OF  THE  SCREEN." 

210  PR I NT "M  THE  FOURTH  WILL  SCROLL  THE  SCREEN" 

220  PR I NT "DOWN  ONE  CHRRRCHTER" 

230  GOSUE2020 

240  PRINT":iDO  VOU  WRNT  R  riEMOHSTRRTION?  (V  OR  N)" 

250  GETCH* : I FCH*= " " THEN250 

260  IFCH$<>"V"THENPRINT"OH  COME  ON..  HUMOR  MEM" 

270  PRINT":?»!ftFIRST  I  WILL  DEMONSTRRTE  THE  SCROLL  RIGHT  FUNCTION" 

280  PRINT"Mi!l«ll!Mi!>iC:VW  SHOHINGW  HOWW  ITW  MOVESW  THE  M'JHOLES  SCREEN" 

290  F0RN=S26T0965  •  RERDR  :  POKEN  .■  R  :  NEXT 

300 

:^10  REN  PUT  ROUTINES  INTO  THE  2ND  CRSSETTE  BUFFER  FOR  DEMO  PURPOSES  ONLV 

320  REM  THEV  CRN  BE  RELOCRTED  RHVUHERE  THAT  IS  SRFE 

330 

340  FORN=  1 TO40 :  SVS  (  826  >  ■  FORM=  1 TO400- 1  ti*N  :  HEXTM ..  N 

350  PRINT":5WH0TICE  HOW  THE  SPEED  INCRERSED  hS  THE" 
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"  rne  )^m  r^hut 


t"* 


YouK  CXIisb.... 


41 

Is  CQy  ComAiari6 

rts  all  in.  a. 
2 4- -pin.  ponx 
at  CHS  II 


"Pet"  Oajnev-s 
granted  3  HJi-ftHes 

1.  Tastier  Cassette  Load 

S.03Cff)ori|  Test  and 
IS  Co/n/TLCiradS . 


ROM  3nd  MANUAL—  $49. 9S 

Specify  3.D  or  4.0  Basic  (Works  with  or  without  toolkit) 


Eastern  HouseSoftware 
3239  Linda  Drive 
WinitonSaleni,  N.  C.  27106 


(919)  924-2B89 
(919)  74B-a44S 


EPROM  PROGRAMMER 

No  fuss  just  plug 
in  an  do  your  own 
EPROMS. 

PROGRAM 

COPY 

VERIFY 

Program  you  own  single  5V  supply 
EPROMS  like  2716,  2532.  Plugs 
directly  into  PET/CBM.  Nothing  else 
to  buy  completely  assembled  and 
tested  including  software.         $195.00 

ALSO  EPROMS  2716    —     $12.50  Each 

2532    —    $28.00  Each 

SHIPPING  —  ADD  $5.00 
MRJ 

7951  No.  4  Road,  Richmond,  B.C. 
Canada,  V6Y  2T4 
Telephone  (604)  273-3651 


OS  CASSETTE,  l.SCLtDES  I.SSTIiLCT- 
lONS.  UPPEk/LDWER  CASE.  COJJTflOL 
MODE;  CtEAR;  DELETE.  tSCAPE. 
BREAK;  CB2  SOUND.  PAUSE.  SET^ 
KORK    TO   PKJKTEB    ...S3.B5 


MODEM-WARE  IV 

ON  20^0  DISK,  ALL  OF  AUOVE  EX- 
CEPT SETKOIIS  TO  PBISTCK,  PRO- 
VE DE5  SErrfORE  TO  DISK.  DISK  TO 
pai\TEE.  DISE  L'TILITIES.  NET- 
WORK L'SAGE  PGy;  DISK  TO  DISK 
(TRANSFER  PROCJRAMS/FI LES  OVER 
PHONE  J;  FLIP  FI  Lli  (  COflRECTS  OLD 
TO  NEH  BOSl  FILES);  DISK  TO  SET- 
VORK;  CONVERT  FILL  PROGRAM  ( CBM 
flEES   TO   ASCII  1     .  . .539.95 


HALPURR  SOFTW, 


2.1500    OLENHOOD    DPI.    LOS    CATOS , 

CA.    95030    SOUSCE   TCFir.f 

11ICR0NXT;  702-1 S.  470 


s  ^i.^clliflt^ 


SELECT  —  A  —  ROM 

For  the  Commodore  PET/CBM 

With  one  rotary  switch  select  1  to  6  separate 

ROMS  or  EPROMS,  without  damaging  your 

computer  board  or  rem  pins.  Now  you  can 

use 

WordPro,  Toolkit,  Visicale,  Eproms 

as2716's  or2532'setc. 

Assembled $80.00 

Kit $45.00 

ROM  SWITCH 

A  switch  between  old  basic  2.0  and  new  4.0 
basic  ROMS.  Now  you  can  utilize  your 
computer  with  new  and  old  software. 

$125.00 

VISA  ORDERS  —  PHONE 

(604)  273-3651  —  JOHN  (604)  273-3416  —  JOHN 

(604)  325-1122  —  STAN 
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IRQ  vetlor  and  view  each  charatier  before  tlie  operating  system  and  slnniling  U)  the  reverse 

operating  system  gets  it.  Then  when  the  top  ol  tlie  routine.  I  am  sure  that  you  can  think  of  many 

screen  is  reached,  the  scroll  down  function  could  other  creative  ideas  which  could  be  accomplished 

be  called  automatically.  This  could  also  be  done  using  similar  technicjues. 

with  the  left  and  right  scroll  routines.  If  t!ie  screen  For  tho.sc  of  you  who  don't  wish  to  type  in  the 

buffer  were  expanded  (under  software)  then  true  complete  listing  of  the  piogram,  I  will  supply  a 

scrolling  into  and  out  of  the  non-visible  portion  of  cojsy  on  tape  for  $2.00,  the  approximate  cost  ot  the 

the  buffer  could  be  implemented.  This  could  help  tape  and  postage.  Send  a  self-addressed  envelope 

word  processing,  some  search-and-destroy  games,  to: 

and  some  advertising  and  attention-getting  rou-  Ralph  Owens 

lines.  Additionally,  one  could  implement  the  Box  202 

cleared  reverse  by  rcachiig  the  reverse  flag  in  the  Enterprise,  KS  67441 

360   PRINT"! I ME  CONTROL   LOOP  COUNTER   rECREhSES" 

370   GOSUE20^'0 

3£.'0 

330  PRINT"ni!M(!HOW  I  NILL  DEflONSTRRTE  THE  SCREEN" 

400  PR I NT "REVERSAL  PROGRRM.   I  WILL  TOGGLE" 

410  PR I  NT "THE  ENTIRE  SCREEN  15  TIMES" 

420  FORN= 1  TO 1 5 : S VS ( S63  > 

430  FuRri=  1 TO200  ■■  NEXTM ..  H 

440  GOSUE2020 

450 

460  PRINT":TI0W  I  WILL  HEMONSTRRTE  THE  CL ERRING" 

470  PR I NT "OF  H  WINHON  ON  THE  SCREEN.   FIRST  I" 

480  PRINT" WILL  REVERSE  THE  ENTIRE  SCREEN..  SO  THRT" 

490  PRINT"VUU  CRN  SEE  WHRT  HAS  BEEN  CLERREIiWpMi!]" 

500  SVS  (.  863 ')  ■  GOSI  IE2i''^20 :  S VS  <  'P-Si^i  ■> 

510  GOSUE2020 

520 

530  PRINT".'lCiW  I  WILL  CHRNGE  THE  LOCRTIOH  OF  THE  WINDOW  flNH  ITS  D I  MENS  I  HNS" 

540  POKES91..20:POKES35..  130:REM  SETS  UPPER  LEFT  CORNER  OF  WINDOW 

550  POKE  899..  10:pOKE901..20 

560  SYSi::363>:  SVS  (890) 

570  GOSUE2020 

580 

590  PRINT":71'HE  NE.'KT  DENONSTRRTION  IS  OF  THE" 

600  PR I NT "SCROLL  DOWN  ROUTINE." 

610  PRINT ":J!WI  WILL  SCROLL  THE  SCREEN  DOWN  ONE  STEP" 

620  PRINT":(!I«n"HEN  10  STEPS 

630  GOSUE  2020 

640 

650  SVSC926::' 

660   GOSUE2020 

670  FnRN=  1  TO  1 0 :  SVS  ■;  926 >  :  NEKTN 

680  GOSUE2020 

690 

700  PRINT":JTHE  important  hKDRESSES  in  THESE" 

7 1 0  F'R  I  NT "  ROUT  I NES  RRE  ■  " 

720  PR  I NTTRE  ■::  1 0  >  "  THE  I R  START  I NG  flDDRE:=;:=:ES  " 

730  PRINTTREaOV'THEIR  CONTROL  ADDRESSES" 

740  PRINT":(!lB]THE  STARTING  RDDRES:=.ES  flPE" 

750   PRINTTRBdeyWE-CROLL   RIi^HT  S26" 

760  PR  I  NTThE  ■;  1 0  >  "REVERSE  SCREEN   863 " 

770  PRINTTRECIO;- "CLEAR  WINDOW     S90" 

780  PRINTTAEaO)" SCROLL  DOWN      926" 

790  GOSUE20;i:ti 

300 

810  PRINT":7rHE  CONTROL  POINTS  ARE  IDENTIFIED" 
820  PRINT"  IN  THE  COMMENTS  IN  THE  LI:-;TINh.  " 
330  PRINT":!!ITHEV  CONSIST  EhSICALLV  OF  THE  EASE" 
840  PR  I  NT  "ADDRESS..  AND  THE  IHITIfiLIZING  OF  THE" 
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850 
860 
870 
380 
h90 


PR  I  NT  "PCI  INTER  REGISTERS  y.  RNH 
PRINT  "THESE..  VOU  CRN  MhKE  THE 
PR I NT "FOR  RNV  PORTION  OF  THE  S 

PRiNT":!!rro  srve  the  routihes  oh 

PR I NT "ENTER  THE  MONITOR  (EV 
PRIHT"HND  TVPE- " 


V.   BV  CHRNGING" 
ROUTINES  HORK" 
CREEN. " 

TRFE  1 ..  " 
S  a  024  V:'" 


900 

910 

20 

30 
940 
950 

60 

78 

S0 

90 

000 
010 
020 
030 
040 
050 

060 

070 
080 
090 
100 
110 

120 
130 
140 
150 
160 
170 
180 
190 

200 

210 
220 
230 
240 

250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 

400 

410 
420 
430 
440 
450 


print":bje;  ' 
PRINT  ".urro 

PR  I  NT  "WE;  ' 

print":bito 

PR I NT "MS  ' 
END 


34 ;■  "SCREEN  ROUT 

ON  disk:  drive  0 

34V'0:  SCREEN  RO 

ON  DISK  DRIVE  1 

SCREEN  RO 


HR*-: 

R\''E 

HR$': 

AVE 

HR*<34>"1 


INE"CHRf  (34) "  ..01 ..  033fl..  03C7" 

TVPE  :  " 
UT I NE  "  CHR*  ( 34 )  "  ..  OS ..  833R ..  0:3C7  " 

TVPE : " 
UT  I  NE "  CHR*  <  34 )  "  ..  OS ..  033fi ..  03U7  " 


0  REM  riRTfl  FOR  ROUTINES  WITH  FiSSEMELV  MNEMONICS 


REN  SCROLL  RIGHT  ROUTINE 


REM 
REM 

DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTH 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 


DECIMRL 
LISTING 

169.- 0 
133..  1 
169..  128 
133..2 
162..  25 
160..  38 


flSSEMBLV 
NMEMONIC; 


1 


1 


177 

200 

145 
1 36 
136 

16..  247 
165..  1 
105  ,.40 
133.1 
165..2 
105 
1 33 
202 
208 


0 


230 


REM 
REM 
REM 
REN 

REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
FIEM 
REM 
REM 


LDR 
STfl 
LDR 
STfl 
LDX 
LDV 
LDR 
IHV 
STR 
DEV 
DEV 
EPL 
LDR 
RDC 
STR 
LDR 
RDC 
STR 
DEX 
BNE 
RTS 


#:f00 

$01 

#*S0 

*^y2 

#*19 
#$26 

(■$01') 

■::*01) 


$F7 

mi 

#$23 

$01 

$02 

#$00 

$02 

$E6 


REM  REVERSE  SCREEN  ROUTINE 


REM 
REM 

DRTR 

DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 
DRTR 


DECIMAL 

LISTING 

169 

0 

1 :33 

1 

169. 

128 

1 33 

--> 

162 

.4 

160 

0 

1  "'■!' 
1  1  1 

1 

73.' . 

L28 

145, 

1 

1 36 

247 

--1 

hSSEMELV 
NMEMONICS 


202 


REr'1 

F:EM 
REM 
REM 
REM 
REM 
REM 
REM 
F:EM 
REM 
REM 
REM 
REM 


LDR 
STR 
LDR 
STR 
LDX 
LDV 
LDR 
EOR 
STR 
DEV 
I:HE 
INC 
DEX 


#$00 
$01 

#$80 

$02 

#$04 

#$00 

<$0i; 

#$S0 

($81  j 

$F7 
$02 


CMJMMENTS; 


THESE  FOUR  LINES  TELL  WHERE 
TO  STRRT  MOVING  THE  SCREEN. 
THE  INDIRECT  RDDRESS  IS 
RT  LOCRTIONS  1 ..  2 
SET  X  TO  #LINES  TO  MOVE 
SET  V  TO  #C0LUMN:E;  TO  MO'./E 
LORD  CHRP  IN  NEXT  COLUMN 
INCREMENT  V  AND 
STORE  IN  THIS  COLLUMN 
DEC  V  TNICE  TO  GO 
BRCK  TO  NEXT  COLUMN 
BUT  l:HECK  IF  DONE  FIRST 
IF  SO  THEN  HDD  48 
TO  ERSE  ADDRESS 

TO  GO  TO  ne;>:;t  line 

ON  SCREEN. 

RDD  IN  CRRRV  TO 

HI  ADDRESS  AND 

DEC  X  TO  COUNT  #  LINES 

IF  NOT  DONE  THEN  KEEP  GOING 

ELSE  RETURN  TO  BASIC 


i::0MMENT:5 


LOAD  ERSE  RDDRESS 
INTO  RDDRESS  1 ,.  2 


GET  CURRENT  CHRR 
TOGGLE  7TH  BIT 
STORE  HEN  CHAR 
GOTO  NEXT  CHAR 
IF  HOT  DONE 
INC  EASE  ADDRESS 
DEC  COUNTER 
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1460 
1470 
1480 
1490 

1500 

1510 
1520 
1530 
1540 
1550 
1560 
1570 
1530 
15S0 
1600 
1610 
1620 
1630 
1640 
1650 
1 6€.£^ 
1 670 
1 6S0 
1690 

1 700 

1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 

1800 

1810 
1320 
1830 
1840 
1350 
1360 
1870 
1  :E:30 
1390 

1 900 

1910 
1920 
1930 
1 940 
1 950 
1 36& 
1970 
1980 
1990 

2000 
2010 

2020 
2030 

1^*040 

2050 
REhUV. 


DRTfl  203.240 
DflTfl  96 


:REM  ENE  $F0 

:REM  RTS 


REM  CLERR  NINDOW  ROUTINE 


REM  DECIMflL 
REM  LISTING 


hSSEMELV 
NMEMOHICS 


DRTfl 
DRTfl 
DflTR 
DRTfl 
DRTfl 
DflTR 
DRTR 
DRTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DRTfl 
DRTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 


1 69  •  0 
133. 1 
169..  12f 
133..2 
162..  5 
160..  16 
169  ..32 
145..  1 
136 
16..  251 
165..  1 
24 

105  ..40 
133.1 
165..  2 

105.0 
1 33 ..  iL 
202 
16..  231 
96 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REN 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


LDfl 
STfl 
LDfl 
STfl 
LDX 
LDY 
LDh 
STfl 
DEV 
BPL 
LDfl 
i::Li:: 
RDC 
STfl 
LDfl 
flDC 
STfl 
DEH 
EPL 
RTS 


#$00 

*01 

tt$S0 

*02 
#*05 

#*10 

#$20 

'::$0i; 

$FE 

$01 

#$28 

$01 

$02 

#$00 

$02 
$E7 


REM  SCROLL  DOWN  ROUTINE 


REM  DECIMflL 
REM  LISTING 


HSSEMELV 
NMEMONICS 


DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTR 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DRTfl 
DRTfl 
DflTfl 
DflTfl 
DRTfl 
PRINT 


1 69 , 

133.. 

169.. 

133.. 

169.. 

133.. 

162.. 

160.. 

177.. 

160.. 

145.. 

193.. 

169.. 

197.. 

203.. 

198.. 

202 

208 .. 

198.. 

20S.. 

96 


GETCHflR$ 

RETURN 

END 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
RNV 
IFCHflR$=" 


191 

1 

131 

4 

0 

240 

0 

1 

40 

1 

1 

255 

1 


^ . -1  .J 


RESS 


LDfl  #$EF 
STfl  $01 
LDR  #$83 
STfl  $02 
LDfl  #$04 
STfl  $00 
#$F0 

#$00 

'::$01>..V 

#$23 

'::$0i::-..V 

$01 
LDfl  #$FF 
CMP  $01 
ENE  $02 
DEC  $02 
DEX 

ENE  $EE 
DEC  $00 
ENE  $E5 
RTS 

KEV  TO  CONTINI 
"THEN2030 


LDX 
LDV 
LDfl 
LDV 
STfl 
DEC 


: CONTINUE  IF  NOT  DONE 
:ELSE  RETURN  TO  EflSIC 


COMMENTS 


:LOflD  BASE  RDERESS 
IN  LuCflTIONS  1..  2 


•LOflri  HEIGHT  OF  NINDON 

■LOAD  WIDTH  OF  WINDON 

:LOflD  fl  BLANK 

: STORE  ELflNK  IN  LOCRTION 

:GOTO  NEXT  POS 

: CHECK  IF  DONE 

:GET  LG  EASE  ADDRESS 

: CLEAR  CHRRV  JUST  IN  CASE 

■ADD  40  FOR  NEXT  ROW 

:AND  REPLACE 

NOW  ADD  CARRV 
:T0  HI  EASE  ADDRESS 

AND  REPLACE 

NOW  COUNT  NUMEEF:  OF  ROWS 
:IF  NOT  DONE..  CONTINUE 

ELSE  RETURN  TO  EflSIC 


COMMENTS 


LORD  STARTING  ADDRESS  LO 

AND  STORE  IN  U£;R  '■.■'ElTOR 

LORD  STARTING  ADDRESS  HI 

AND  STORE  IN  USR  VECTOR 

LORD  PAGE  COUNTER 

AND  STORE  IH   USR  VECTOR 

LOAD  X  WITH  240  (l,-'4  OF  1000-40) 

INDEX  EV  ZERO 

TO  GET  NEXT  CHARflCHTER 

THEN  RESET  POINTER  TO  ONE  LINE  LOWER 

AND  STORE  CHAR  ONE  LINE  LOWER 

MOVE  TO  NEXT  BASE  ADDRESS 

CHECK  TO  SEE  IF 

fl  PAGE  EOUNDAFlV  HA:5  BEEhJ  CROSSED 

IF  NOT  THEN  SKIP 

ELSE  DEC  HI  ADDRESS 

NOW  DEC  COUNTER: 

CHECK  TO  SEE  IF  1/4  FINISHED 

THEN  DEC  PAGE  COUNTER 

IF  FINISHED 

THEN  RETURN  TO  BASIC 


IF  SO 
CHECK 

IF  SO 
E" 


© 
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Machine 
Language: 
Comparison 
Shopping 

Jim  Butterfield 
Toronto,  Canada 

One  of  tiie  early  tilings  we  leani  in  6502  coding  is 
how  to  compare  lunnbers.  Unfortunately,  we  are 
ofLen  lauglu  wiongK .  It's  not  hard:  but  sonic  oi 
the  intuitive  things  we  do  at  the  start  can  Ijackfne 
on  us  later. 

We  can  compare  an\"of  oiu"  thiee  data  registers 
—  A,  X,  or  V  —  with  memory  or  witli  a  fixed 
(immediate)  value.  We  will  usually  follow  this 
comparison  with  a  l^ranch:  BEQ  if  equal,  BN'E  if 
not  equal,  lii'.S  (Branch  Carry  Set)  if  the  register  is 
equal  or  iiigher,  BCC  (Branch  Carry  Clear)  if 
lower.  L'nless  you're  a  very  sul)tle  prograuuuer, 
don't  follow  a  comparison  with  BPL  (Branch  Plus) 
oi-  BMI  (Branch  Minus). 

If  you  want  lo  test  .'\  for  less  than  8,  for  exam- 
ple, it  w(Hikl  .seem  natural  to  say  CMP  #$()8:BM1 
LESS  —  which  is  wrong!  Correct  coding  is  BCC 
LESS.  Don'l  feel  had  if  you  liave  done  this:  even 
the  Microsoft  interpreter  gets  this  one  wrong- 
occasionally. 

Where  docs  the  problem  arise?  W'crc  told, 
coirettU .  thai  a  Conqjare  instruction  docs  a  sul)- 
traction  and  throws  away  t!ie  result,  lea\'ing  the 
flags  behind  to  icll  us  how  the  comparison  has 
gone.  The  flags  afTected  are  the  same  ones  as  for  a 
subtract:  Z,  C,  and  N  (Zero.  Carr)  and  Negative). 
Reading  this  we  lend  to  tliink  —  wrongly!  —  thai  if 
we  siiblract  a  smaller  nmnbcr  from  a  larger  number 
we  must  get  a  positive  result.  Wrong!  If  we  subtract 
a  \ery  small  number,  sa\  01 .  from  a  very  large 
niunbcr,  sa\'  hexadecimal  EF,  the  result  isofcoiu-se 
FEand  lliat  is  a  negative  number.  If  we  then  tested 
the  N  Hag  \\iili  BPL  or  BMI,  our  program  would 
seem  to  lell  us  thai  01  is  noi  smaller  than  FE  —  and 
this  is  obviously  nonsense.  Don't  get  the  impression 
thai  BPI.and  BMI  might  work  if  they  were  used 
on  signed  nmubers.   They  don'l  work  at  all  for 
almost  any  application. 

The  C'arry  flag,  on  the  other  hand,  never  plays 
us  false.  C'arr)'  is  set  if  the  \alLie  in  the  register  is 
equal  or  higher. 

So  break  votnscli  ofihc  habit  of  using  BPL  or 
BMI  ailer  loniparisons.  Switch  to  BCS  and  BCC  — 
thev  won't  trip  \()u  up. 

Address  Comparisons 

A  common  Job  in  medium-io-large  size  machine 


language  programs  is  to  compare  one  address 
against  another.  \'ou'll  often  be  walking  an  indirect 
address  through  a  table,  and  you  want  to  know 
when  you  have  reached  the  end. 

There  is  no  single  instructitJii  which  will 
compare  two  bytes  at  a  time  for  you.  You'll  have  to 
make  up  a  series  of  instruclions  to  do  it.  There  are 
many  ways,  but  one  of  my  favorites  is  two-byte 
subtraction.  If  you  subtract  one  number  from 
another,  you'll  notice  right  away  which  one  is 
higher. 

When  using  subtraction,  remember  not  lo  fall 
into  the  same  BPL  trap  we  have  already  mentioned. 
We  must  once  again  make  a  point  of  using  BCS 
and  BCC. 

First,  a  less  elegant  way  which  illustrates  the 
methodology.  Supp<jse  we  have  an  address  at 
ADDR  and  ADDR+  L  low  order  first  as  usual;  and 
suppose  our  second  address  is  stored  at  TOP  and 
TOP+  1 ,  We  can  spot  whether  .-\Di:»R  has  reached 
or  passed  TOP  by  subtracting  (low  order  first,  of 
course): 

SEC 

LDAADDR  low  order 

SBC TOP 

LDA  ADDR  +  I  high  order 

SBCTOP+1 

BCS  REACHED  branch  if  there  or  beyond 

Notice  that  we  don't  care  about  the  results  of  the 
subtraction;  the  flags  tell  us  all  we  need.  Now  ...since 
we  don't  need  those  results,  we  could  change  the 
first  subtiaction  to  a  comparison.  This  would  save 
lime  and  space,  since  the  compare  instructions  don't 
need  SEC: 

LDAADDR  low  order 

CMP TOP 

LDA  ADDR +1  high  order 

SBCTOP+1 

BCS  REACHED 

This  works  in  the  same  way  as  the  previous  pro- 
gram, but  faster  and  in  t)ne  less  byte.  It's  qtiite  com- 
mon in  monitors  and  otlier  large  programs. 

It  often  happens  that  you  have  youi-  working 
address  loaded  into  vour  registers;  you  may  have 
been  doing  arithmetic  on  the  address.  I  (your 
high-order  address  hap]3ens  to  end  up  in  A,  and 
the  low-ordei',  sa)-,  in  X,  )oii  can  then  code  (luitc 
elegaiuly: 

CPX  TOP  low  order 

SBCTOP+1  high  order 

BCS  reached 

Summary 

Comparisons  are  quite  easy  to  handle,  once  y(Hi  get 
rid  of  your  bad  habits.  The  same  techniques  can  be 
readily  extended  to  compare  values  of  greater  than 
one  byte. 

After  a  while,  the  coding  methods  become 
quite  auiomatic.  and  comparing  methodologv  will 
be  just  one  more  tool  in  your  bag  of  tricks.  Al  that 
time,  you  can  start  writing  programs  that  arc 
beyond  coiuparc  ...  O 
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Using  TAB, 
SPC  And  LEN 


Ronald  L.  Straley 
Ft.  Myers,  FL 

Back  to  the  basics  of  programming  on  the  PET. 
Let  us  look  at  two  of  the  iunclioiis  used  to  print 
with:  (TAB  and  SPC).  Also  we  will  look  at  the  LEN 
function  while  we  demonslrale  the  other  two. 

According  to  COMMODORE'S  write-up,  the 
TAB  function  will  print  strings  in  the  position  you 
specify  +   1  which  is  great  for  priming  to  the 
screen  in  an  unformatted  maimer.  I'hey  say  the 
SPC  function  prints  the  number  you  specify  in 
blanks  or  spaces  to  move  your  print  positions.  Rut 
you  still  have  an  unformatted  printout.  What  we 
will  do  is  work  up  a  program  to  demonstrate 
formalling  on  the  screen  and,  also,  when  we  want 
to,  we  can  use  the  same  routine  to  format  the 
printer. 

When  using  the  T.AB  function,  the  PET 
always  starts  ctnuuing  from  tlie  left  side  of  the 
screen  whenever  TAB  is  encountered.  As  far  as 
SPC  i(  always  starts  counting  from  the  last  printed 
position  and  counts  from  there.  Example  1  is  using 
TAB  to  ]jriiu  to  tlie  screen.  Example  2  is  using 
,SPC  to  print  to  tiie  screen. 

The  ]n  oblems  start  wiien  ue  want  to  use  tiie 
same  routine  lor  the  printer.  The  printer  looks  at 
TAB  and  SPC  in  the  same  manner,  alwavs  counting 
Ironi  the  last  printed  position  and  is  also 
iinlormalted. 

Example  2 

We  can  see  lliat  by  using  TAB  or  SPC  by  lhemsel\es, 
we  can't  use  the  same  rtnuine  for  the  printer  that 
we  use  for  the  screen.  Iliis  is  where  the  LEN 
ftiiu  lion  comes  into  pla\  for  lis.  .Atioidinglv,  the 
LE.\  function  will  coiuit  how  man)'  spaces  there 
are  in  liie  string  we  want  to  print.  So,  with  a  combi- 
nation of  T.\B  or  SPC  and  LEN,  we  should  be  able 
to  formal  oiu"  output  and  use  it  either  on  tlie  screen 


or  on  oiu"  printer.  ' 

What  we  want  to  do  is  space  om-  print  over  so 
that,  whatever  the  length  of  the  string  we  want  to 
print  is,  it  will  always  line  up  in  a  formatted 
manner. 

Eirst  we  will  try  TAB  and  set  up  oin-  formal  to 
space  over  X  spaces  and  then  format  our  oulpiu 
right  justified.  We  will  use  a  statement  like:  PRIN  T- 
rAB(X-LEN(Bl$));B  IS.  What  this  will  do  is  tab 
over  X  luimber  of  spaces  and  then  subtract  the 
number  of  spaces  in  our  string  and  then  star! 
printing,  except  TAB  starts  from  the  right  of  the 
screen  and  we  end  up  with  no  format  again. 

Example  3 

But  we  lunv  have  our  printer  fbrmaiicd. 

Example  4 

Now  we  are  down  to  our  last  option,  but  the  best 
one  of  all.  SPC  and  LEN  used  in  combination  are 
the  commands  we  have  been  looking  for.  On  both 
the  screen  and  the  printer,  the  SPC  fiuiclion  is 
used  in  the  same  manner;  it  starts  cotniting  from 
the  last  printed  position.  Let  us  now  use  a  statement 
like:  PRINTSPC(X-LEN(Bl.S));B1.1STlus  will  k-t  us 
space  over  X  mimber  of  spaces.  l)ut  will  then 
subtract  the  number  of  s[)aces  in  otu-  sti  ing  and 
then  start  printing  from  there.  Since  the  printer 
and  the  screen  treat  SPC  in  the  same  manner,  both 
printouts  will  be  the  same. 

Example  4 

'Ibis  will  work  on  all  ROM  machines,  and  10  or  SO 
colunm,  but  if  you  want  to  use  the  80  column  PET, 
it  works  great  the  wa)'  it  is  since  both  the  screen 
and  the  printer  are  80.  If  vou  are  using  the  10 
column  PET  and  printer  vou  mav  want  to  add  68 
IFA$  =  "P"  THENX=  ]^):^•  =  2(l  This  will  cau.se  the 
]jrinter  to  spread  the  lines  out  and  vou  can  have 
moie  room  bet^\■een  the  columns. 

\'ou  can  ha\e  fun  and  do  some  ex[)erimenting 
with  the  'A  conunands  T.AB,  SPC  and  LEN.  Wiu 
sjiould  nov\  be  able  to  li\  up  those  troLiblesome 
print  routines  and  only  u.se  (Mie  routine  to  do  all 
\()ur  printing,  whether  on  the  screen  or  the 
nrinter. 


10  PRINT":]"  :J<=5-V=S 

20  PRINT"  S5B::REEH  OR  a='B;: INTER" 

30  GETfH$  ••  I  Ffl|-= "  "  GOTO30 

40  I  Fh$=  "  P "  THEHOPEH 1 ..  4  -  CMD 1 

50  E*="RiJH" 

60  El $=".56" 

65  B2*="1.25" 

66  B3$="23.6?" 

;^0  PR  I NTE* ;  TfiE  <  ;>0 ;  B 1  * .:  THE  <  V ) .:  B2$ ;  TflE  ( V ) ;  E3$ 
71  : 


?5  PRINTE*.:THEOO;E2$;TfiB'::V);B3$;THB(V).:El* 
73  PRINT: PRINT 
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30  PR  I  NTEl: ;  SPC  (;••=;):  E 1  f ;  SRC  <  V ) :  E2$ ;  SPC  <  V ) ;  B3t 
81  : 

r  t." 

85  PRINTED  ;  SPC':: K) ;  E2*;  SPC(V>  ;  E3$ ;  SPC-;  T ) .:  El$ 
SS  PRINT: PRINT 

90  pRINTEif;TREt:X-LEN'::Elif):;';El*.:TRB'::V-LEH(E2$>);E2$;TflB^:V-LEH<E3*>;>;E3* 

91  ■■ 

95  PRINTE$;THB<K-LEN<E2$>>.:E2$;TflE(V-LEN<E3$v>.;E3$;TfiE(V-LEH(:El*>>;El* 

92  PRINT: PRINT 

100  PRINTE*.  SPC'::X-LENc:E1*>  ) ;  Ei$;  SPCCt'-LEN<E2*>  >;  B2f  :  SPC^V-LEN^:E3t:J  >;B3* 

101  : 

105  PRINTE:t.;SPC<X~LEN':E2$>>.E2$.;SPL:<V-LEN(E3$X:';E3$JSPC(V-LEN(EU>);Elt 
U0   PRINT 

111      : 

200  I FRf = " P " THEHPR I NT# 1 ^  CLOSE 1 


EXAnPLE  1    RON  .B61.2523.67 

RON  1.2523.67.56 

EXAHPLE:  2    RON      .56        1.25 
RON      1.25       23.67 


23.67 
.56 


EXAnPLE  3   RON. 561. 2523, 67 
R0N1.2523.67.56 

EXAMPLE  4   RON   .56     1.25    23.67 
RON  1.23    23.67      .56 


PIE-C 


PET/CBN  *  IEEE-488 
TO  PARALLEL  PRINTERS 
By  LemData  Products      t 


P.I.E.-C  MEAMS— Professional  design,  Indispensible  features,  Excellent  quality  and  Cost  effectiveness.  You 
can't  buy  a  better  parallel  interface  for  your  PET/CBM. 

Our  P.I.E.-C  will  interface  your  PET/CBM  through  the  IEEE-488  bus  to 

the  MEC  Spinwriter,  the  C.  Itoh  Starwriter,  printers  by  Centronics,  Epson,  Anadex,  Escon  Products,  the 
Paper  Tigers  by  IDS,  the  MIPLOT  by  Watanabe,  the  DIP  printers,  the  AJ-841,  the  OKIDATA  printers,  plus 
ALL  OTHER  parallel  ASCII  printers. 

Assennbled  with  custom  case,  CBM-TO-ASCII  code  converter  and  appropriate  cable,  the  P.I.E.-C  is  only 
$119.95  (  +  $5  S&H).  Md.  Res.  +5%  tax.  Specify  printer  and  CBM  nnodels. 

LemData  Products,  P.O.  Box  1080,  Columbia,  Hd.  21044  Phone  (301)  730-3257 

*PET/CBM  are  trademarks  of  Commodore  Business  Machines 
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Nuts  And  Volts 

#6 

Gene  Zumchak 
Buffalo,  NY 

In  my  last  column,  I  reviewed  the  hardware  aspects 
of  handshaking  and  also  described  the  workings  of 
a  programmable  input/output  port.  I  suggested 
that  I  would  detail  the  transmit  and  receive  software 
for  using  handshaking  to  pass  a  block  of  data 
between  two  systems.  While  I  still  plan  to  do  that 
(some  day),  I  think  a  more  meaningful  exercise 
would  be  to  consider  the  hardware  and  software 
necessary  to  connect  a  common  peripheral  to  a 
computer  system.  Namely,  I  would  like  to  consider 
the  connection  of  a  parallel  style,  or  so-called 
"Centronics"  style  printer. 

As  I  mentioned  last  time,  (actually  a  whole  line 
was  left  out  during  the  typesetting),  Centronics 
style  handshake  timing  has  three  possible  flags. 
The  one  asserted  by  the  sender  is  a  pulse  called 
DA  lA  S IROBE  and  is  usually  low-true.  The 
receiver  responds  with  a  BUSY  indication,  usually 
high-true.  When  BUSY  falls  false  (unbusy),  the 
ACK  pulse  (low-true)  is  asserted.  Again  as  men- 
tioned, only  one  of  the  return  flags,  either  BUSY 
or  ACK,  need  be  used. 

I  just  recently  took  delivery  of  a  NEC  Spinwri- 
ter  with  a  parallel  interface.  While  it  didn't  quite 
take  the  day  I  allowed  to  get  it  running  with  my 
SYM,  I  did  encounter  a  few  surprises.  While  the 
connector  and  the  pin  assignments  are  definitely 
Centronics  style,  the  flags  are  not  true  Centronics. 

The  product  description  manual  gives  one 
short  paragraph  on  the  timing.  Fortunately,  the 
accompanying  timing  diagram  accurately  describes 
the  timing.  While  the  printer  has  a  flag  called 
BUSY,  it  is  not  the  Centronics  BUSY,  and  does  not 
take  part  in  the  handshake  sequence.  To  avoid 
confusion,  it  might  better  have  been  called  READY. 
When  this  BUSY  goes  low,  it  indicates  that  the 
printer  is  ready  to  receive  data.  Only  ACK  takes 
place  in  handshaking.  An  initial  ACK  is  sent  to 
indicate  that  it  is  ready  for  the  first  character,  thus, 
ACK  is  used  to  prompt  for  characters  rather  than 
to  indicate  that  the  printer  is  through  processing 
the  last  character.  Actually,  for  characters  beyond 
the  first,  the  two  descriptions  mean  the  same  thing. 


For  my  Receive  Only  model  (5530),  characters  are 
accepted  with  the  handshaking,  but  no  characters 
are  printed  until  the  buffer  is  full,  or  a  carriage 
return  is  received.  Busy  goes  true  when  the  buffer 
is  full,  and  remains  high  while  the  line  is  being 
printed.  This  timing  is  shown  in  Fig.  1. 

The  easiest  way  to  handle  Centronics  liming  is 
to  poll  BUSY  and  forget  about  ACK.  However, 
this  is  not  true  Centronics  timing,  and  BUSY  takes 
no  part  in  the  handshaking.  Since  ACK  is  a  narrow 
pulse  (2.2  microseconds),  it  cannot  be  polled,  but 
must  be  used  to  set  a  flip-flop.  This  precludes  the 
use  of  a  simple  input  port  bit  to  handle  the  flag 
from  the  printer.  There  are  two  choices.  We  can 
either  use  a  family  port  chip  which  ha.>  edge-sensi- 
tive inputs  (like  the  6522),  or  we  must  provide  the 
flip-flop,  which  is  reset  by  ACK  and  polled  as  a 
conventional  BUSY  flag  with  an  input  bit.  DATA 
STROBE  can  be  used  to  set  the  BUSY  flip-flop 
when  a  character  is  sent.  This  alternative  is  shown 
in  Fig.  2. 

Since  my  SYM  has  no  fewer  than  three  6522s 
which  are  available  for  I/O,  I  did  not  have  to 
provide  the  flip-flop,  but  could  use  one  of  the 
edge-sensitive  input  control  bits.  The  connection  I 
used  is  shown  in  Fig.  3.  I  used  the  VIA  chip  that 
responds  to  the  base  address  $A800.  I  used  the  low 
seven  bits  of  Port  A  for  the  printer  data,  and  bit 
PA7  as  an  input  bit  to  poll  BUSY.  The  CA2  output 
bit  was  used  for  the  DATA  STROBE  and  input 
control  bit  CBl  was  used  to  detect  the  ACK  edge. 
As  can  be  seen  from  the  figure,  the  data  lines  and 
strobe  were  buffered.  This  was  necessary  since  the 
Spinwriter  inputs  have  a  470  ohm  pullup  resistor. 
When  the  input  is  zero,  there  are  five  volts  across 
470  ohms  and  about  10  milliamps  are  drawn  in 
addition  to  the  1,6  mA  TTL  input,  A  family  port 
chip  can  usually  drive  only  one  TTL  load,  but 
certainly  not  1 1.6  mA.  I  used  an  octal  three-state 
gate  chip  for  the  buffer  (81LS97).  Anv  non- 
inverting  gate,  like  the  74LS24I  would  be  suitable. 

A  suitable  program  for  sending  a  character  to 
the  printer  is  shown.  For  those  not  familiar  with 
the  6522,  certain  defined  events  cause  a  flag  in  the 
Interrupt  Flag  Register  (IFR)  to  be  set.  A  corre- 
sponding bit  in  the  Interrupt  Enable  Register 
(lER)  can  be  set  with  software  to  enable  the  occur- 
rence of  any  particular  event  to  generate  an  inter- 
rupt as  welt.  In  this  case,  interrupts  are  not  desirable 
and  we  will  poll  the  IFR  to  see  if  our  flag  has  been 
set.  Four  control  bits,  CA I ,  CA2,  CB 1 ,  and  CB2 
can  be  used  as  input/output  flags  for  handshaking. 
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VAK-1  MOTHERBOARD 


We  also  carry: 

SYM-1  $229°'' 

A1M-65W/1K      389°° 
AIM-65W/4K      439°° 

We  also  do  custom 
hardware  and  soft- 
ware for  the  6502 
microprocessor 


PRICE:  $139°° 

Call  or  write  for 
shipping  charges 
and  our  complete 
catalog. 


The  VAK-1  was  specifically  designed  for  use  with  the  KIM-1,  SYM-1  and  the  AIM  65  Microcomputer  Systems. 
The  VAK-1  uses  the  KIM-4*  Bus  Structure,  because  it  is  the  only  popular  Multi-Sourced  bus  whose  expansion 
boards  were  designed  specifically  for  the  6502  Microprocessor. 


SPECIFICATIONS: 

Complete  with  rigid  CARD-CAGE 

Assembled  (except  for  card-cage).   Burned  in  and  tested. 

All  IC's  are  in  sockets 

Fully  buffered  address  and  data  bus 

Uses  the  KIM-4*  Bus  (both  electrical  Pin-out  and  card  size)  for  expansion  board  slots 

Provides  8  slots  for  expansion  boards  on  1"  centers  to  allow  for  wire-wrap  boards 

Designed  for  use  with  a  Regulated  Power  Supply  (such  as  our  VAK-EPS)  but  has  provisions  for  adding 
regulators  for  use  with  an  unregulated  power  supply. 

Provides  separate  jacks  for  one  audio-cassette,  TTY  and  Power  Supply. 

Board  size:  14.5  in.  Long  x  11.5  in.  Wide  x  8  in.  High 

Power  requirements;  5V.DC  ®  0.2  Amps. 

*KtM-4  Is  a  product  of  MOS  Technology/C.B.M. 

ENTERPRISES 
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Suite  D. 

Phoenix,  AZ  65017 
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CA2  and  CB2  can  be  outputs  which  are  automati- 
cally asserted  when  data  is  read  or  written  to  the 
corresponding  port.  For  write  handshaking,  for 
example,  CA2  can  be  made  to  go  low  automatically 
when  writing  to  Port  A.  CA2  is  returned  high  by  a 
transition  on  the  CAl  input.  Alternatively,  CA2 
can  be  pulsed  low  on  a  write  to  Port  A,  returning 
high  without  feedback  after  500  ns.  Finally,  CA2 
can  be  manually  made  low  or  high  with  software. 
Both  CA2  and  CB2  can  serve  as  edge-sensitive 
inputs. 

It  is  assumed  that  the  character  to  be  printed  is 
in  the  accumulator  when  the  program  is  called.  It 
is  good  practice  for  an  output  routine  to  leave  the 
registers  unchanged.  Since  X  and  Y  are  not  used  in 
the  program,  they  will  not  be  affected  and  need 
not  be  saved.  The  accumulator  is  pushed  on  the 
stack  twice;  once  for  later  use  in  the  program,  and 
a  second  time  so  that  the  program  can  terminate 
with  A  unchanged.  This  permits  one  output 
loutine  to  follow  another. 

Lines  260  and  270  cause  the  low  seven  bits  of 
Port  A  to  be  made  outputs,  keeping  PA7  as  an 
input  bit.  The  PCR  register,  which  defines  the  use 
of  the  CA  and  CB  control  pins,  is  initialized  with 
data  "$0E",  called  STRBOFF,  which  manually 
forces  CA2  high. 

The  BUSY  output  is  polled  in  the  first  loop, 
WAITl.  When  BUSY  goes  false,  the  program  falls 
into  the  second  loop,  WAIT2,  where  the  IFR  is 
read  and  the  bit  corresponding  to  the  CB  I  input 
flag  is  tested.  This  flag  is  set  by  a  transition  on  the 
ACK  line.  When  that  condition  is  found,  the  flag  is 
cleared  by  reading  port  B  or  Input  Register  B 
(IRB).  Now  the  character  to  be  printed  is  pulled 
from  the  stack  and  sent  to  port  A.  The  DATA 
STROBE  is  exercised,  by  manually  forcing  CA2 
low,  then  high  again.  This  destroys  the  character  in 
A,  which  is  restored  prior  to  the  return  with  the 
second  pull  from  the  stack. 

This  program  is  by  no  means  the  only  solution. 
There  would  appear  to  be  a  large  number  of 
possible  connections  of  the  port  bits  to  accomplish 
the  same  thing,  and  perhaps  different  programs 
for  a  particular  connection.  However,  many  combi- 
nations and  programs  will  not  work.  For  example, 
why  did  I  manually  lower  and  raise  the  CA2 
strobe?  Why  not  program  CA2  for  the  handshake 
pulse  mode  and  let  it  pulse  automatically  when 
data  is  written  to  the  A  port?  I  confess  that  I  tried 
it.  Since  auto  pulsing  will  also  occur  for  a  "read"  of 
port  A  as  well,  when  an  attempt  was  made  to  poll 
BUSY  at  WAIT  I,  data  was  unintentionally  strobed. 
This  caused  the  same  character  to  be  printed  more 
than  once.  Another  possible  change  would  be  to 
detect  .ACK  with  the  CA  1  input  instead  of  CB  1 , 
and  keep  all  functions  in  Port  A.  Again,  reading 
Port  A  at  \V.\IT1  would  cause  the  CA  1  flag  to  be 
cleared  before  it  was  recognized.  The  program 


would  then  fall  into  the  loop  at  WAIT2  and  wait 
for  an  ACK  signal  that  would  never  occur  since  the 
printer  would  be  waiting  for  a  DATA  STROBE 
that  will  never  occur. 

An  experienced  programmer  will  not  panic 
when  something  strange  happens,  or  worse  yet, 
nothing  at  all  happens.  In  this  case,  most  of  the 
unexpected  results  can  be  predicted  with  a  careful 
reading  of  the  6522  spec'  sheet. 

I  was  initially  annoyed  because  a  legitimate 
BUSY  Hag  w^asn't  available  and  also  because  two 
return  Hags  seemed  to  be  required.  Actually,  the 
printer  has  two  additional  output  flags  that  I  did 
not  choose  to  use,  one  called  FAULT  and  another 
for  PAPER  OUT.  Both  of  these  flags,  however,  are 
reflected  in  the  BUSY  flag.  That  is,  if  a  fault  occurs 
{cover  not  closed)  or  if  the  PAPER  Ol'  I  switch  is 
engaged,  BUSY  will  not  return  fal.se.  A  PAPER 
indicator  appears  on  the  printer  panel,  as  well  as  a 
READY  light.  Thus,  nothing  is  lost  by  not  using 
these  additional  flags. 

Is,  in  fact,  BUSY  necessary?  After  I  had  a 
program  running  successfully,  I  NOPed  the 
WAITI  loop.  I  then  created  "paper  out"  and 
"fault"  conditions.  The  printer  stopped  and  the 
READY  light  went  out.  Printing  resumed  as  soon 
as  the  condition  cleared.  Thus,  it  appears  that  the 
printer  always  affects  BUSY  before  ACK,  and 
.ACK  will  not  be  asserted  if  an  unreadv  state  exists. 
It  would  then  appear  that  the  information  con- 
tained in  BUSY  is  in  fact  redundant,  and  that  only 
one  flag,  .ACK,  and  one  wait  loop  need  be  used  to 
obtain  normal  print  operation. 

The  actual  incorporation  of  the  Ptint  Character 
program  just  considered  will  depend  upon  the 
particular  computer  system  which  yoii  are  using, 
and  how  it  handles  input  and  output.  I'his  is,  in 
fact,  worthy  of  an  article  by  itself,  and  I  am  prepar- 
ing an  article  on  console  input/output  if  not  for 
this  issue,  then  the  next. 

If  one  is  attempting  to  interface  a  Spin  writer 
to  a  PET,  the  above  program  is  not  necessary,  if 
the  printer  is  interfaced  by  the  GPIB  bus.  In  this 
case,  the  polling  and  sending  of  flags  is  performed 
routinely  internally.  However,  the  printer  will 
need  a  liardwarc  interface  that  makes  it  look  like  a 
legitimate  GPIB  instrinnent.  While  building  this 
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Figure  1.  Timing  Signals  for  NEC  Spinwriter  6522 


A  BRILLIANT  FUTURE  FOR  YOUR  AIIVI-65  WITH  THE  BANKER  MEMORY 
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Your  36K  of  free  address 
space  is  ttie  AIM's  most 
valuable  and  limited  re- 
source. Witti  today's  large 
capacity  RAf^/1  boards,  ROM 
boards,  disk  systems,  video 
boards,  and  other  expansion 
accessories  it  is  easy  to  deplete 
tfiis  resource  before  tine  applica- 
tion requirement  is  satisfied.  MTU 
has  solved  this  problem. 


THE  BANKER  MEMORY  contains  32K  of  RAM,  4  PROM  socl<ets  for  271 6/2732/2332,  a  PROM  programmer,  40  bits  of  parallel 
I/O  and  4  timers  from  two  6522  I/O  chips.  Addressing  is  extremely  flexible  with  the  RAM  independently  addressable  in  4K 
blocl<s,  PROM'S  independently  addressable,  and  I/O  addressable  anywhere  on  a  64  byte  boundary  (even  in  AIM'S  I/O  area  at 
AXXX  by  adding  a  single  jumper  to  the  AIM). 

This  may  sound  familiar,  but  read  on!  Unlike  other  AIM  compatible  memory  boards,  THE  BANKER  MEMORY  has  on-board  bank- 
switching  logic!  The  four  8K  blocks  of  RAM  plus  the  4  PROM  sockets  make  up  8  resources,  each  associated  with  a  bit  in  an 
Enable  Register.  Through  this  Enable  Register  resources  may  be  turned  on  and  off  under  software  control.  When  a  resource  is 
off,  its  address  space  is  freed  for  other  uses.  You  can  even  put  BANKER  resources  at  the  same  address  and  switch  among  them 
for'virtually  unlimited  RAM  and  PROM  expansion!  You  can  even  have  multiple  page  zero's  and  stacks!  Do  you  need  1 60K  byte  of 
memory?  It  only  takes  5  of  THE  BANKER  MEMORY  boards  and  you  end  up  with  5  page  zeros  and  stacks  to  boot! 

There's  more!  The  BANKER  MEMORY  also  incorporates  18  bit  addressing  which  allows  for  the  256K  address  spaces  of  the 
future  RAM,  PROM,  and  I/O  each  has  its  own  full  1 8  bit  address  decoder  which  allows  these  resources  to  be  in  different  64K 
banks  This  board  and  other  MTU  products,  such  as  our  320  by  200  dot  VISIBLE  MEMORY  and  Floppy  Disk  Controller  with  16K 
DMA  RAM.  can  turn  your  AIM  into  a  truly  powerful  6502  computer  that  far  surpasses  the  packaged  systems  in  functional 
performance. 

INTRODUCTORY  SPECIAL  K-1 032-1  32K  BANKER  MEMORY  FULLY  ASSEMBLED  AND  TESTED  $395.00  ($450.00  as  of 
March  1 ,  1 980)  or  the  K-1 032-2  1 6K  RAM  only  with  bank  switching  and  1 8  bit  address  bus  only  $295.00       j^ggs 
Isn't  it  time  you  took  a  closer  look  at  MTU  —  we  offer  you  power  now  with  an  eye  to  the  future.  Effilfi. 

WRITE  OR  CALL  TODAY  FOR  OUR  48  PAGE  FALL  1980  6502  CATALOG 
International  requests  include  $1 .00 


VISA  and  MASTERCARD  accepted 
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inlerface  is  not  trivial,  it  vvouicl  n«)t  appear  to 
require  more  than  a  handful  of  gates  and  a  flip-flop 
or  two,  perfiaps  $10  or  less  in  pans  (sans  connec- 
tors). Since  I  do  not  have  a  PET,  I  cannot  verify  my 
gut  feeling.  However,  I  do  hope  to  gel  my  hands 
on  one  in  the  near  future,  and  ii  .should  result  in 


an  article  on  building  a  GPIB  printer  interface,  or 
perhaps  building  an  interface  for  any  non-standard 
peripheral  (without  using  another  microcomputer 
on  the  inside). 

I  welcome  yoiu-  feedback  on  my  aricles.  I 
know  that  al  least  two  people  read  mv  cohnmi. 
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Figure  2.  Flip-flop  to  generate  "Centronics"  type  BUSY 
from  ACK  and  DATA  STROBE. 


Figure  3.  Connection  from  VIA  to  Spinwriter. 


0300- 
0301- 
0302- 
0304- 
0307- 
0309- 
030C- 
03OF- 
0311- 
0314- 
0316- 
0318- 
031B- 
031C- 
031F- 
0321- 
0324- 
0326- 
0329- 
032A- 


30 
AD 
29 


48 
48 

A9  7F 
8D  03  A8 
A9  0E 
8D  0C  A8 
AD  01  AS 

FB 

0D  A8 

10 
F0  F9 
AD  00  A8 
68 

8D  01  A8 
A9  0C 
8D  0C  A8 
A9  0E 
8D  0C  A8 
68 
60 


0010 
0020 
0030 
0040 
0050 
0060 
0070 
0080 
0090 
0100 
0110 
0120 
0130 
0140 
0150 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
0240 
0250 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0350 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 


; BASIC  HANDSHAKING  VJRITE  ROUTINE  FOR  SPINWRITER 


2/25/80 


IRE 

ORA 

IRA 

DORA 
PCR 


IFR 

STRBOFF 
STRBOH 


$A800  IS  THE  BASE  ADDRESS  OF  6522 
ON  SYM  USED  FOR  PRINTER  PORT 


DE  $A800 
DE  $A801 

DE  SA801 
DE  $A803 
DE  $A80C 


DE  $A80D 
DE  $0E 
DE  $0C 

BA  5300 
MC  5300 
OS 


LOVJ  SEVEN  BITS  PORT  A 

IS  PRINTER  DATA 
PA7  IS  USED  TO  POLL  BUSY 

DETERMINES  CONTROL  BIT  USE 
CA2  USED  AS  OUTPUT  FOR 
PRINTER  DATA  STROBE 

BIT  4  (CBl)  USED  FOR  ACK 

MAKES  CA2  HIGH 

MAKES    CA2    LOVI 


PRINTCHAR  PHA 
PHA 
LDA 
STA 
LDA 
STA 

WAITl  LDA 
BMI 

WAIT2  LDA 
AND 
BEQ 
LDA 
PLA 
STA 
LDA 
STA 
LDA 
STA 
PLA 
RTS 
.EN 


SAVE  FOR  POSTERITY 


#$7F 

DDRA 

#STRBOFF 

PCR 

IRA 

WAITl 

IFR 

1510 

WAIT2 

IRE 
t 

ORA 

#STRBON 

PCR 

*STRBOFF 

PCR 


HAKE  LO-7  BITS  PORTA  OUTPUTS 

;  MAKE  SURE  CA2  HIGH 
WAIT  FOR  UNBUSY 
WAIT  FOR  ACK  PULSE 


CLEAR  CBl  FLAG 
GET  BACK  PRINT  DATA 
SEND  TO  PRINTER 
PULSE  DATA  STROBE 


GET  BACK  PRINT  DATA 
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DLOAD : 
AIM 

Memory 
Loader 

Joel  Swank 
Rockaway,  OR 

The  AIM  65  monitor  gives  you 
the  ability  to  save  and  load  non- 
contiguous blocks  ol  memory  on 
cassette  tape,  paper  tape,  or  a 
user  device.  This  handy  Icatiue 
allows  you  to  save  a  program, 
along  with  any  vectors  or  tlata 
values  it  needs  to  excciiie,  and 
then  to  load  it  all  with  just  one 
command.  The  AIM  assembler 
uses  the  same  format  lor  its  object 
files.  You  can  assemljle  several 
programs  at  different  locations 
and  load  them  all  with  one  load 
command. 

But  the  AIM  load  command 
is  missing  a  couple  ol  use!  nl 
features.  When  loading  a  file  with 
the  AIM  load  command  there  is 
no  way  to  tell  which  memory 
locations  are  being  loaded.  Alter 
assembling  a  program  there  is  no 
way,  without  a  listing,  to  tell 
where  the  program  ends.  You 
miglit  also  want  to  assemble  a 
pitjgram  at  one  address  and  load 
it  into  memory  at  a  different 
address,  as  in  the  ca.se  ol  a  pro- 
gram that  is  to  reside  in  ROM.  It 
would  also  be  convenient  to  be 
able  to  save  data  from  one  area  of 
memory  and  load  it  back  to  a 
dinerent  area.  The  .-MM  load 
command  cannot  do  this. 

D1.0AD  is  a  modified  version 
of  the  AIM  load  conmiand  diat 
adds  these  two  missing  leatutes. 
DLOAD  works  like  the  AIM  load 
command  except  tiiat  it  ilrst 
recjuests  an  offset  with  the  'OFF- 
SET ='  prompt.  This  hexidecimal 
nmnber  is  input  with  the  AIM 
subi-oiiline  ADDIN.  ADDIN  is 
the  same  rrjuline  that  inputs  your 
replv  to  tlie  "FROM  = '  and  ^"O  = ' 


COMPUTE! 

163 

0000 
onoo 

;   DLORD  :  LORD  RIM  OBJECT  FILE  AND  DISPLhY  J_HE... 

0000 

;          ADDRESSES  OF 

THE  DHTR  LORDED,  OPTIUHHL 

0000 

OFFSET  LORD. 

0000 

;   RIM  SUBROUTINES 

0000 

WHERE I  =*E843 

;OPEN  INPUT 

0000 

INRLL  =*E993 

; INPUT  R  CHRR  FROM  ROD 

0000 

CLRCK  =$EB4D 

;CLERR  CHECKSUM 

0000 

CHEt;:RR  =*E54B 

.:  INPUT  HEX  BYTE 

0000 

CKERR  =$E3S5 

;  ERROR  RETLSRN 

0000 

RBVTE  =$E3FD 

J  READ  OBJECT  BYTE 

0000 
0000 

STBVTE  =$E413 
DU13   =J:E520 

■'^^^''^^\Mf?^'' 

0000 

HDD  IN  =*EFlflE 

; INPUT  RDDRESS  FROM  KBD 

on  on 

PCHEK  =*E907 

; CHECK  FOR  INTERRUPT 

odoo 

liJRITRZ  =*E2DE 

;DISPLRY  CONTENTS  OF  RDDR 

no  00 

con  IN  =tElRl 

.tNORMRL  RETURN  TO  flIM 

dodo 

NUMR   =*ER46 

;DISPLfiY  BYTE  IN  HEX 

0000 

OUTPUT  =tE97R 

; DISPLAY  RCCUM 

0000 

CRLF   =*E9F0 

;SEND  CR  RND  LP 

0000 

fliti  RRH 

on  on 

flDDR   =*R41C 

; OBJECT  LORD  POINTER 

000  n 

CKSUM  =*fi41E 

; CHECKSUM  STORAGE 

0000 

CURRD  =*fl41C 

; ADDRESS  INPUT  BUFFER 

0000 

;    ZERO  PRGE 

0000 

OFFL   =0 

; OFFSET  SRUE  RRER 

0000 

OFFH   =1 

0000 

POINTL  =2 

.: DUPLICATE  LOAD  POINTER 

0000 
0000 

PuIHTH  =3 
RECLEN  =4 

; RECORD  LENGTH  SfliJERREfl 

0000 

*=*200 

0200  flOOO 

DLOflD  LDY  irjFFMSi3-LIT; 

n202  20D502 

.TSR  KEPX 

'  ; DISPLAY  ■■OFFSET=-' 

0205  20flEER 

JSR  ADD IN 

.:  INPUT  ADDRESS 

0203  B0F6 

BCS  DLORD 

; ERROR  -  TRY  AGAIN 

02 OR  aDlER4 

LDR  CKSUM 

;RNY  ENTERED'- 

02 OD  F005 

BEQ  SRUOFF 

;YE£,  SRUE  IT 

02  OF  FI900 

LDR  ttO 

0211  8DlDfl4 

3TR  CURRD+l 

;N0..  USE  ZERO 

0214  flDlCR4 

SRUOFF  LDR  CURflD 

.:COPY  CURRD  TO  OFFSET 

0217  8500 

STR  OFFL 

0219  flDlDfl4 

LDR  CURflD+1 

021C  8501 

STR  OFFH 

02 IE  204SE8 

OPFIL  .3SR  I..1HEREI 

.:OPEN  INPUT  DEUICE 

0221  2n7r:02 

JSR  STREC 

; START  RECORD 

0224  20RtO2 

JSR  PSTRRT 

; DISPLAY  START  ADDRESS 

0227  4C4502 

JMP  BVTLUP 

022fl  207C02 

RECLUP  JSR  STREC 

.:  START  RECORD 

022D  fit.  04 

LDX  RECLEN 

:ZERO  LENGTH  RECORD? 

022F  F037 

BEQ  FINISH 

;YES..  END 

0231  flDli::R4 

LDR  RDDR 

:  IS  NEW  ADDREE:S  EQUAL 

0234  C502 

CMP  POIMTL 

.:T0  OLD  ADDRESS-? 

0236  DO 07 
OfJs  flDlDfl4 

BNE  NEWLOC 

;N0,  HEW  BLOCK  OF  MEMORY 

LDR  RDDR+1 

0236  C503 

CMP  POINTH 

023D  F006 

BEQ  BYTLUP 

023F  20BC02 

HEWLOC  JSR  PEND 

; DISPLAY  END  OF  LAST  RECORD 

0242  20R602 

JSR  PSTBRT 

;HND  START  OF  THIS  ONE 

0245  20FDE3 

BYTLUP  JSR  RBYTE 

; INPUT  AN  OBJECT  BYTE 

0241B  2013E4 

JSR  STBYTE 

; STORE  IT 

024B  E602 

INC  POIHTL 

;BUMP  POINTER 

024D  D002 

BNE  NOCY 

024F  Et.03 

INC  POINTH 

0251  C:604 

NOCY   DEC  RECLEN 

; COUNT  BYTE 

0253  DOFO 

BNE  BYTLUP 

;D0  NEXT  BYTE 

0255 

;  END  OF  RECORD 

0255  20FDE3 

JSR  RBYTE 

.GET  CHEC:KSUM 

025S  CD1FR4 

CMP  CKSUM +1 

.:RND  COMPARE 

025E:  DO  OS 

BNE  ERROUT 

; ERROR  IF  NOT  EQUAL 

025D  20FDE3 

JSR  RBYTE 

0260  CDlEfi4 

CMP  CKSUM 

0263  F0i::5 

BEQ  RECLUP 

.:  CHECKSUM  OK  -  NEXT  RECORD 

0265  4C:55E3 

ERROUT  JMP  CKERR 

; ERROR  EXIT 

026S  20Bi:02 

FINISH  JSR  PEND 

; PRINT  ADDRESS  OF  LAST  RECORD 

026B  fl205 

U»'.   t5 
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prompts,  so  the  syntax  is  the 
same.  The  hexadecimal  number 
you  enter  is  added  to  the  starting 
address  of  each  block  of  memory 
in  the  file.  For  example,  a  block 
that  was  saved  from  location  $200 
can  be  loaded  back  at  location 
$1000  by  replying  'EOO'  to  the 
'OFFSET  = '  prompt.  You  can 
calculate  the  proper  offset  by: 
$1000-$200  =  $E00.  You  can  also 
load  a  file  to  a  location  lower  in 
memory  by  adding  $  1 0000  to  the 
desired  load  address  before 
performing  the  calculation.  A  file 
dumped  from  location  $B000  can 
be  loaded  back  at  $200  as  follows: 
$10200-$B000  =  $5200,  Enter 
'5200'  in  response  to  the  'OFF- 
SET =' prompt.  If  the  file  contains 
multiple  blocks,  then  the  offset  is 
added  to  the  starting  address  of 
all  blocks.  This  means  you  must 
take  care  when  loading  a  file 
containing  vectors  or  zero  page 
data.  These  blocks  will  also  be 
displaced  by  the  offset  you  en- 
tered. You  may  load  a  file  to  its 
original  address  by  entering  a 
space  or  return  in  response  to  the 
'OFFSET^' prompt. 

DLOAD  next  issues  the 
standard  AIM  'IN  = '  prompt  to 
open  the  input  device.  You 
respond  as  you  normally  would 
when  using  the  AIM  load  com- 
mand. DLOAD  then  displays  the 
start  and  end  addresses  of  each 
contiguous  block  of  memory  as  it 
is  loaded.  If  you  are  using  an 
offset,  the  addresses  displayed  are 
those  at  which  the  data  is  being 
stored  and  not  the  addresses  in 
the  file.  DLOAD  calls  the  AIM 
RCHEK  subroutine  at  the  start  of 
each  data  block  so  that  you  can 
stop  or  cancel  the  program. 
DLOAD  used  zero  page  memory 
locations  0-4,  so  be  sure  not  to  try 
to  load  anything  there.  Included 
is  a  listing  of  DLOAD  assembled 
at  location  $200.  DLOAD  can  be 
executed  from  ROM. 
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CI26D  20FDE3 

FLUP   JSR  RB'i'TE 

;RERD  END  OF  LAST  RECORD 

0270  Cfl 

DEX 

0271  DOFR 

BNE  FLUP 

i:i273  2093E9 

JSR  INflLL 

0276  2020E5 

JSR  DU13 

; CLOSE  TRPE 

0279  4CfllEl 

JMP  COM  IN 

; RETURN  TO  MONITOR 

027C 

;    END  OF  MAINLINE 

027C 

;    SUBROUTINES  1 

-OLLOI,. 

027C 

;   STREC  :  INPUT 

BEGINNING  OF  RECORD 

027C  20i:i7E9 

STREC  JSR  RCHEK 

;  CHECK.  FOR  INTERRUPT 

027F  2093E9 

JSR  INFILL 

;SERRCH  FOR  ';' 

0282  C93B 

CMP  «';■- 

0284  D0F6 

BNE  STREC 

028^.  204DEB 

JSR  CLRCK 

; CLEAR  CHECKSUM 

0289  204EE5 

JSR  CHEKflR 

.:GET  RECORD  LENGTH 

028C  8504 

STR  RECLEN 

.:SRUE  IT 

028E  204BE5 

JSR  CHEKRR 

;GET  RECORD  ADDRESS 

0291  8DlDfl4 

STR  RDDR+1 

;RND  SflUE 

0294  204BE5 

JSR  CHEKRR 

0297  18 

CLC 

0298  6500 

RDC  OFFL 

jflDD  OFFSET 

029fi  8DlCfl4 

STR  RDDR 

029D  fiDlDfl4 

LDR  RDDR+1 

02R0  6501 

RDC  OFFH 

02fl2  8D1DH4 

STR  RDDR+l 

02ft5  60 

RTS 

02R6 

;   PSTflRT  :  DISPLRY  STARTING  RDDRESS  CF  MEMORY  BLOCK 

02fl6  20FCIE9 

PSTi=lRT  JSR  CRLF 

;HEW  LINE 

02R9  R007 

LDY  #STMSG- 

LITS 

02flB  20D502 

JSR  KEPX 

; DISPLAY  'STflRT='' 

02flE  20DBE2 

JSR  URITR2 

.: DISPLAY  ADDRESS 

02B1  RDlCfl4 
02B4  8502 

LDR  RDDR 

;COPY  RDDR  TO  POINT 

STR  POIHTL 

02B6  flDlDfl4 

LDfl  RDDR+1 

0289  8503 

STR  POINTH 

a2BB  60 

RTS 

02BC 


REND  :  DISPLAY  ENDING  ADDRESS  OF  MEMORY  BLOCK 


02BC.  flOOE 
02BE  20D502 

REND   LDY  »EHDMSG-LITS 

JSR  KEPX 

DISPLAY  '  EHD=' 

02C1  38 

SEC 

02C2  R502 

LDR  POINTL 

DECREMENT  LAST 

02C4  E901 
of (56  §502 

SBC  #1 

STR  POINTL 

02C8  fl503 

LDfl  POINTH 

02Cfl  E900 

SBC  #0 

02CC  2046EA 

JSR  HUMR 

; DISPLAY  RDDRES' 

02CF  R502 

LDfl  POINTL 

02D1  2046ER 

JSR  NUMfl 

02D4  60 

RTS 

02D5 

;   KEPX  !  DISPLAY  MESS 

AGE  FROM  LI TERR 

02D5  B9E102 

KEPX   LDR  LITS,Y 

GET  A  BYTE 
;GUIT  ON  NLILL 

02D8  F006 

BEQ  RETURN 

02Dfl  207fiE9 

JSR  OUTPUT 

DISPLRY  IT 

02DD  C8 

I  NY 

;NEXT  CHRRRCTER 

02DE  D0F5 

BNE  KEPX 

02E0  60 

RETURN  RTS 

02E1 

LITERflL  TABLE 

02E1 

LITS   =* 

02E1  4F46 

OFFMSG  .BYTE  'OFFSETS  0 

02E3  00 

02ES  5354 

STMSG   ,BVTE  'STflRT='>0 

02ER  00 

02EF  2045 

ENDMSG  .BYTE  '  END=  ' ..  0 

02F1  00 

02F2 

.END 

02F2 

ERP.ORS=  0000 

TABLE 


e 
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Educational 
Software  Exchange 
Announces 
Mail-Order  Service... 

SOFTSWAF  is  a  joint  projecl  of 
tlie  San  Mateo  County  Office  of 
Education  in  Redwood  City,  CA, 
and  Computer-Using  Educators 
(CUE).  SOFTSWAP  offers  ap- 
proximaiely  240  public  domain 
instructional  piograms  collected 
for  the  TRS-80,  Commodore 
PET,  Apple  and  Compucolor.  A 
disk  of  progi  anis  for  the  Atari  is 
in  preparation. 

Most  of  the  SOFTSWAP 
programs  are  short,  stand-alone 
instrtictional  units.  Many  are  drill 
&  practice  exercises  for  the  ele- 
mentary school  level  or  for  reme- 
dial work  at  the  secondar)'  level. 
About  one-fourth  are  math  or- 
iented. All  of  the  programs  have 
been  evaluated  by  educators  and 
edited  for  factual  and  spelling 
errors,  inaccurate  or  incomplete 
instructions,  programming errois 
and  other  problems.  Each  disk 
contains  from  5  to  28  programs 
for  various  subjects  and  grade 
levels,  all  for  one  microcompiuer 
system. 

Programs  and  disks  may  be 
copied  without  charge  by  visitors 
to  the  Center.  Any  of  the  13  disks 
may  also  be  pinchased  by  mail  at 
a  cost  of  SIO  per  disk,  or  one 
SOFTSWAP  disk  will  be  sent  free 
in  exchange  to  any  educator  who 
contiibules  a  disk  with  al  least 
one  original  program  for  the 
SOFTSWAP. 

Our  goal  is  to  distribute  the 
SOFTSWAP  programs  as  widely 
as  possible  and  they  may  all  be 
freely  duplicated  onto  either  disks 
or  tapes  (but  may  not  be  sold).  All 
programs  have  been  donated  to 


the  SOFTSW^AP  and  we  encour- 
age educators  everywhere  to  send 
their  own  contributions  to  this 
growing  collection.  New  disks  are 
Usted  in  the  CUE  NEWSLETTER, 
or  send  $  1  for  ordering/exchange 
information  to: 

Ann  Lathrop, 
Library  Coordinator 
SOFTSWAP,  San  Mateo 
County  Office  of  Education 
333  Main  Street 
Redwood  City,  CA  94063 

Be  sure  to  include  your  name, 
address  and  information  on  the 
microcomputer  system(s)  you 
have. 

Copyright  Notice:    Every 
effort  is  made  to  scrupulously 
avoid  copyright  infringement  and 
programs  identified  as  being  in 
violation  of  copyright  are  removed 
from  the  exchange. 

The  Complete 
Guide  To 
Hassle-Free  Pet 
Programming 

Rcston  Publishing  Company  has 
annoimced  the  publication  of  a 
new  computer  progrannning 
book.  PET  BASIC  by  Ramon 
Zamt^ra,  William  Scarvie  and  Bob 
Albrecht. 

Perfect  for  the  beginning 
PET  user,  this  book  is  filled  with 
lively  examples,  do-it-yourself 
exerci.ses  and  creative  cxplofa- 
tions.  You'll  be  confident  as  you 
experiment  with  yotu"  machine's 
many  capabilities  and  features, 
and  you'll  create  giaphical  images 
without  confusion. 

Experienced  PET  users  will 
find  this  book  a  handy  reference 
guide.  You'll  discover  a  variety  of 
things  yotn-  PET  can  do.  Each 


new  piece  of  information  is 
presented  logically,  step-by-step 
with  open  page  formats  and  lots 
of  humor. 

PET  BASIC  1  can  also  be 
used  to  teach  children  to  use  PET 
(age  9  and  up).  You'll  find  games 
and  exercises  and  current  symbols 
in  children's  world  characters. 

The  authors  have  over  a 
dozen  years  of  experience 
teaching  and  writing  books  for 
beginning  computer  users. 

May,  1981,  (R-5524-5)  paper 
$12.95,  222  pp.  (R-5525-2)  cloth 
$17.95,  272  pp.  To  Order  from 
Reston:  call  800-336-0338. 


Smart  Terminal 
Program  For  The 
Atari®  Features 
Autodialing 


Redmond,  Wa.  —  The  MicroPeri- 
pheral  Corporation  has  an- 
nottnced  TSMART,  a  smart 
terminal  program  written  for  the 
ATARI  800',  with  provision  for 
autodialing  other  comptiters.  The 
program  is  available  on  cassette 
with  instructions  for  transferring 
to  disk.  TSMART  permits  transfer 
of  BASIC  programs  between  a 
remote  host  comptiter  and  an 
ATARI  cas.sette  or  disk  storage 
device.  The  autodial  fcatine 
works  in  conjunction  with  the 
AUTO-MICROCONNECTION, 
a  direct  connection  modem 
(Si 99.50),  manufactured  by  the 
MicroPeripheral  Corporation. 

The  program  permits  off-line 
text  preparation  (messages, 
manuscripts,  letters,  etc.)  with  a 
text  editing  or  word  processing 
program  for  on-line  transmission. 
A  btiilt-in  featin-e  permits  creation 
and  storage  of  text,  then  trans- 
mission by  TSMART  for  those 
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who  do  not  have  a  text  editor. 

TSMART  also  permits 
transfer  of  source  code  assembler 
files.  The  recipient  can  create  the 
object  code  using  an  editor/ 
assembler  program,  A  separate 
command  is  available  for  trans- 
ferring object  (hexadecimal)  code 
files,  such  as  ATARI  Music 
Composer  Files. 

An  AUTOBUF  feature  will 
open  and  close  the  memory 
storage  buffer  automatically 
when  uploading  or  downloading. 
TSMART  recognizes  the  atito- 
matic  buffer  open/close  (X-on/X- 
off)  codes  transmitted  by 
TSMART  or  other  compatible 
programs.  Downloading  from 
FORUM  80  bulletin  boards  is  also 
accomplished  automatically.  The 
buffer  can  be  "toggled"  on  and 
off  as  many  times  as  desired  while 
data  is  being  downloaded.  An- 
other feature  is  software  selectable 
half  or  ftill  duplex  operation. 

The  program  will  also  auto- 
matically send  me.ssages  to  bulletin 
boards  using  the  standardized 
block  mode  or  16  line  prompt 
recognition  message  entry. 

The  program  was  written  for 
the  ATARI  800®  by  Dr.  James  W. 
Clark.  It  can  be  used  with  any  RS- 
232  compatible  modem,  although 
the  dialer  feature  cannot  be  u.sed 
with  acoustic  modems.  TSMART 
is  supplied  in  a  protective  binder 
with  extensive  easy-tf)-use  oper- 
ating instructions  and  is  priced  at 
$79.95.  For  additional  informa- 
tion on  TSMART  or  the  MICRO- 
CONNECTION  '" ,  contact  the 
MicroPeripheral  Corporation, 
264.3  151st  Place  N.E.,  Redmond, 
WA.  98052,  Telephone  (206) 
881-7544. 


Computer  Courses 
For  Deaf  Adults 

Rochester  Institute  of  Technology 
(RIT)  wall  offer  two  computer 
cour-ses  for  deaf  adults  this  sum- 
mer through  the  National  Tech- 
nical Institute  for  the  Deaf 
(NTID).  The  first  course.  Intro- 
duction to  Data  Processing,  will 


provide  deaf  adults  with  intro- 
ductory technical  skills  applicable 
to  job  situations  involving  compu- 
ters. Topics  include:  the  relation- 
ship of  data  processing  to  other 
parts  of  a  business  and  an  intro- 
duction to  the  BASIC]  program- 
ming language.  It  will  be  offered 
from  August  3-7. 

The  second  course,  Advanced 
Data  Processing,  will  give  ex- 
perienced computer  u.sers  knowl- 
edge of  software  applications  on 
small  computer  systems.  Topics 
include:  data  base,  interactive 
programming  packages,  and 
color  gtaphics.  This  course  will  be 
offered  from  August  10-14. 

Both  courses  involve  intensive 
tull-day  .sessions  and  feature 
iiands-on  practice  in  a  microcom- 
puter center.  For  more  infor- 
mation or  to  register,  contact 
Donald  Beil,  NTID  Data  Pro- 
cessing Dept.,  Rochester  Institute 
of  Technology,  One  Lonib 
Memorial  Drive,  Rochester,  NY 
14623,  or  call  (716)475-6373 
(voice  or  TTY). 


Game  I/O  Extender 
For  Apple  II  From 
Vera  Computing 

Newbury  Park,  CA,  June  15, 
1981  —  Versa  Computing,  Inc. 
has  announced  a  new  peripheral 
device  for  Apple  II  computers. 
E  Z  Port  extends  the  I/O  port  to 
the  outside  of  the  computer  for 
quick  and  easy  changeover  from 
game  paddles  to  joystick  to 
VersaWriter,  etc. 

E  Z  Port  is  a  board  which 
adheres  to  the  side  of  the  com- 
puter with  a  special  foam  adhesive 
strip.  A  24"  cable  connects  to  the 
game  I/O  inside  the  Apple. 

E  Z  Port  incorporates  a  ZIP 
socket  (Zero  Insertion  Pressure) 
in  its  design.  Ordinary  DIP  plugs 
and  sockets  are  not  designed  to  be 
used  over  and  over  —  eventually 
the  sockets  will  not  make  contact 
and  the  pins  will  snap  off  the  DIP 
plugs.  ZIP  sockets  will  help  16  pin 
connectors  last  much  longer, 


because  no  pressure  is  exerted 
within  the  socket  until  the  ZIP's 
cam  lever  is  switched  to  the 
engage  position. 

At  only  $24.95,  E  Z  Port  is 
one  of  the  most  effective  im- 
provements an  Apple  owner  can 
make  to  the  computer. 

E  Z  Port  is  available  from 
your  local  computer  retailer  or 
from:  Versa  Com  puling,  3541 
Old  Conejo  Road  —  Suite  104, 
Newbury  Park,  CA  91320.  Tele- 
phone: (805)  498-1956  or  499- 
4800.  Dealer  Inquiries  Welcome. 


AIM  65  Enclosure 

This  enclosure  is  specially  de- 
signed for  the  Aim  65  microcom- 
puter. Fotu-  models  are  offered  to 
hold  any  of  the  major  sy.stems  on 


the  market  for  the  Aim  65  in- 
cluding power  supplv.  Formed 
out  of  heavy  ABS  plastic  it  features 
a  metal  card  cage  and  sturdy 
metal  base.  The  color  is  white 
with  black  trim.  The  price  is 
$149.95  each.  Contact  Don-El 
Enterprises,  3261  Michigan  Ave., 
Costa  Mesa,  CA  92626.  Phone 
(714)546-7481.     " 


Free  PEF/CIBM 
COMAL  Compiler 

The  COMAL  USERS  (iROUP 
has  announced  that  it  will  distri- 
bute, free  of  charge,  a  (JOMAL 
Information  Package  that  will 
include  instructions  on  how  Com- 
modore PET/CBM  users  mav 
obtain  a  FREE  COMAL  compiler 
for  their  computer. 

COMAL  is  a  powerful,  struc- 
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tormarix  CompuMn  'K'  lis 


OPEN  EVERY  DAY  9  lo  6  PST 

ColiforniQ.  Alaska  G  Foreign  orders  '(714)  d9B-40AS 

Shipping  Informocion  or  Oochorders  call  (714)  690-0260 

Service  Center  and  for  Technicol  Informoiion  (714)  460^502 

TELEX  695-000   ANS:BETA     REF=CCMO 


moil  order 


ORDEK  TOLL  FREE 

600-654-6654 


lappkz  compubcr 

W  Authorized  Dealer 


ALL  EQUIPMENT  IS 
FCC  APPROVED 


APPLE  II  PLUS  16K 1049 

APPLE  I!  PLUS  46K 

(APPLE  Memory) 1189 

APPLE  II  Stondord  Models. . .  CALL 
DISK  II  DRIVE  &  CONTROLLER.  529 
This  model  includes  DOS  0-3  16  tecio' 

TOT  FIVE  SELLEM 

Language  System  V/PqkqI  ^25 

Sileniype  Printer  W/Jnierfoce 549 

Hayei  MiCfomodem  M      31Q 

Videx  Videolerm  60  w/gropWcs  335 

Z-aO  MiCfOJoM  Cord  299 

Atnt  COMPUTEK  IHC. 
Disk  II  Drive  Only  ')45 

Integer  or  Applesoft  It  rir-nwoie  Card         155 

Graphics  TaD^el     ^^^ 

Parallel  Printer  Interfoce  Card 155 

Hi. Speed  Send  Interfoce  CortJ.  155 

Smorrerm  SO  Co'umn  Video  Cord  335 

MOUHTAIM  COMnntR  HK. 

Music  System  (16  Voices) 479 

A/D  +  D/A  Interfoce 319 

Expansion  Chassis ^55 

lntral/X-10  System 21<? 

Clock/Calendar  Cord 239 

Supertalker  SD-200 2^1'? 

Rompius  +  Cord 1^5 

Romwnter  Cord      -  -  - 155 

CAIIFOKNU  COMWTIK  SYSTCMS 
CiocWColendor  Module  i  C9 

GPIO  lEEEriae  Card  259 

Asynchronous  Serial  Interface  Cord        .       1  29 

Centronics  Porollel  Interfoce  Cord 99 

Ve  carry  all  CCS  hordwore  Pleose  coll 

MISC.  APf  LE  HAHOWAKE 

1 6K  Rom  Card  Microsoft     169 

ADT  Ngmberrc  Keypod(old  or  new  kybrd)  1 1  5 
ALF  3  Voice  Music  Cord  229 

Alpho  Syntouri  Keyboord  System       .         1399 

Corvus  1  DMD  Hard  Disk CALL 

LQ2er  Lower  Cose  Plus 50 

Micro-Sci  Oish  Drives      CALL 

SSM  AtO  SeriQl/Parollel  Cord  A6T  189 

Sup-R-Terminol   60  Col    Cord 339 

SVA  6  inch  Floppy  Disk  Controller 345 

Versownter  Digitiier  Pad  229 

WE  HAVE  MAMY  MOftE  ACCESOMES 

FOK  THE  AWIE  II  IH  STOCK— 

FLEASE  CALL  OK  WKITE  FOK  A  FftKE  LOT. 


A 

ATARI 

MODEL 

SOO  16K 

*799 


l!«W8Big- 


Atori  400  1  6K 499 

S10  Dish  Drive 499 

410  Program  F^ecorder. 69 

650  Interfoce  Module 175 

622  Thermal  Printer  (40  COl) 369 

825  Printer  (80  col) 795 

Atari  1  6K  Horn  Module. , 1 55 

Atori  Light  Pen 65 

V*  Itocli  oil  Atari  QCC*uer1*l  6 
softwar*,  p4*4t*  call  fv  nwr*  Info. 


PRINTERS 


Anodex  DP-9500  W/2h  Ouffer 1375 

Anadex  DP-9501  W(2K  Ouffer 1450 

C    Itoh  Storwritei  25  CP5 1750 

C    Itch  Storwnter  45  CP5  ,  2450 

Centronics  737  625 

Epson  MX. 70  WfGraphics  449 

Epson  MX. 60  132  Col     620 

Popei  Tiger  ID5-445  W/Doi  Plot. .   749 

Paper  Tiger  IDS  460  W/Dol  Plot 1 195 

Poper  Tiger  IDS  560  W/Dot  Plot,  1495 

C2ume  Sprint  5/45  Do isywheel,  ,  .2550 

Silentype  w/3nterface  for  Apple  II 549 

Woionobe  Digiplot 1 295 


VIDEO  MONITORS 

Amdex/Leedex  Video-i00  12    D&l/        139 
Hitocni  13    Color  389 

NEC  1  2    P31  Green  Phospher CALL 

Ponocolor  1  0"  Color 375 

Sonyo  9'  D&W 179 

Sonyo  12'   DOW 255 

Sonyo  12'    P31  Green  Phospher    ,    .  295 

Sanyo  1  3'   Color 443 


Chollenger  4P 699 

C4PMF  (Mini  Floppy  System) .  1 599 

CIP  Model  II     449 

Sorgon  II  (Disk  or  Cassette). ...  35 
Fig  Forth  (Disl^  Only) 69 


APPLE  SOFTWARE 

DOS  Toolkit  .  .  ^^ 

Appleploi *0 

Tax  Planner , *9 

Apple  Voter - . . 65 

Apple  Post  ^5 

DJ    PorrfoliQ  EvotuotOf ^^ 

D.J    News  G  Quotei  f^eponer  65 

Apple  FoftrOfi    1  &5 

Apple  Piloi I?*? 

DOS  0  3  UpgfQtJe, ^^ 

Muiic  Theory  _ . , d5 

The  ComtoUef  Dus  Sys   51 P 

MISC.  Am.lCATtOKS  PACKA6CS 
Visicok  ^23 

Desktop  PJon  II  16<? 

CCA  Dc[Q  MonoQemont  DN^,  55 

Easywntief  Word  Prtxes^or  225 

ASCII  Expreii  65 

Super  Tejii  11  10^ 

Progrommo  Apple  Pie 1 1*? 

The  Londlord  Apt   Mgmc    Pkg  64^ 

Peochtree  Dusmess  Software.  CALL 

Ton  Preparer  by  HowordSofc.  ■5* 

Applebug  As^em/DisQism/Editor 75 

3-D  Grophic^  Dy  Dill  Dudge 53 

GAMES 

Flight  SimuSotor  34 

The  Wizard  and  The  Princess 32 

Cosmos  Miii'ori  (Space  fnvoders) 24 

Sorgon  II  Chess  .  - .  - 32 

Hi'Res  Foo[boll  ,- 39 

Adveniure  b/  Microsoft-,....,..., 27 

PhOnlOfns  Five   _ . .  »^.* 3*? 

HeversQl  (Oihello).  .-..,..... 34 

KEASE  CALL  of^  wnin 

FOR  A  COMPLETi 
SOFTVARE  LIST. 


Or^DERING  INFORMATION:  Phone  Orders  mviied  using  VISA,  MASTEf^CARO  AMERICAN  EXPF^ESS  DINERS  CLUQ  CARTE  DLANCHE.  or  bonis  wire  tronjler  Credit 
cofdi  subjec:  to  service  chorge  2%  for  VISA  0  mC  5%  for  AE  DC  6  CD  Mail  Orders  rnoy  send  credii  cord  qccount  number  {include  expiration  dote) 
CQshieri  or  certified  check,  mane/  order  or  perionol  check  (allow  10  do/s  lo  clearj  Please  include  c  telephone  number  with  oil  orders  Foreign  orders  {ej<cluding 
Miliiary  PO  s)  add  1 0%  fot  shipping  oil  furds  must  be  in  US  dollars  Shipping  handling  and  insgrorice  m  U  S  odd  3%  (nninpmum  i4  00)  Colifornio 
residents  odd  6%  soies  lox  We  occepi  CODs  under  IbCO  OEMs  Institutions  G  Corporotionj  pleose  send  for  wnuen  quoioiion.  All  equipment  is  subject  to 
price  change  and  ovotlobiliiy  without  nonce  All  equipment  is  new  and  complete  wuh  monufactuJ'er  wottoriTy  'usually  QO  days)  We  cannot  guoroniee 
merchoniibiiity  of  any  products  We  shiD  most  o-'de'S  wichin  2  doys 

WE  ARE  A  MEMDER  OF  THE  DEHER  DUSINESS  DUREAU  AND  THE  CHAMDER  OF  COMMERCE 
SHOWROOM  PRICES  MAY  DIFFER  FROM  MAIL  ORDER  PRICES. 
PLEASE  SEHD  ORDERS  TO: 
COHSUMER  COMPUHRS  MAIL  ORDER  6014  PARKWAY  DRIVE,  GROS5MOHT  SHOPPING  CEHTER  HORTH  LA  MESA  CALIF.  93041 
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tured  language  like  PASCAL,  yel 
is  easy  to  learn  like  BASIC.  It  is 
destined  to  become  quite  popular 
in  the  years  to  come.  Already  it  is 
reported  to  be  the  official 
programming  language  in 
DENMARK. 

The  COMAL  Information 
Package  contains  information 
about  User  Groups,  Books,  Arti- 
cles, and  Software  that  both  cur- 
rent and  prospective  COMAL 
users  should  know  about.  And  it 
contains  instructions  for  Ctmimo- 
dore  PET*/CBM  computer  users 
on  how  to  get  a  free  COMAL 
compiler  for  their  computer. 

To  receive  the  COMAL 
Information  Package,  simply 
send  a  Self  Addressed  Stamped 
Envelope  to:  The  COMAL  USERS 
GROUP,  5501  Groveland  Ter- 
race, Madison,  VVI  53716.  Outside 
the  United  States,  please  include 
$2.00  for  Air  Mail  Handling.  $.50 
to  Canada.  *PET  is  a  trademark 
of  Commodore. 


SHORTAX 
Program  Updated 
For  1981  Taxes 

SHORTAX,  a  year  around  tax 
planning  program,  will  now 
compute  1981  income  and  social 
security  taxes  as  well  as  1980  and 
1979.  The  update  is  based  on  tax 
laws  in  effect  as  of  January  1, 
1 98 1 ,  The  program  will  be  revised 
whenever  the  tax  laws  are 
changed. 

The  SHORTAX  program 
has  also  been  modified  to  run 
on  most  types  of  CP/M  systems 
that  use  Microsoft's  BASIC-80 
(MBASIC)  release  5.0  or  later, 
and  will  run  on  Apple  computers 
with  the  appropriate  CP/M 
modification.  SHORTAX  will 
also  operate  on  the  Radio  Shack 
TRSDOS  systems  (Models  I,  II  or 
III)  and  on  Micropolis  disk 
operating  systems  using  the 


Micropolis  disk  extended  BASIC. 
Use  of  the  program  requires  a 
cpu  with  at  least  48,000  bytes  and 
at  least  one  disk  drive.  Under  CP/ 
M  a  few  systems  ma)  require 
56,000  bytes  of  cpu  memory. 
According  to  the  company,  the 
program  is  also  being  converted 
to  run  on  a  Pertec  2000  system 
and  the  Apple  disk  s\  stems. 

The  SHORTAX  program  is 
designed  for  fast,  inicractive 
calculations  of  before  and  after 
tax  simulations.  As  many  as  20 
complex  tax  computations  can  be 
simulated  in  as  little  as  an  hour.  It 
can  be  used  to  quickU  calculate 
the  tax  impact  of  incorporating  a 
business,  filing  an  amended  tax 
return,  investing  in  a  tax  sheltered 
investment  or  transferring  income 
producing  property  to  a  college 
trust  fund.  The  program  calcu- 
lates the  federal  incc>me  tax  using 
the  tax  rate  schedules,  the  income 
averaging  method  and  the  op- 
tional maximimi  tax  ibrniula. 


Adventures  in  your  mailbox. 

Games,  too  .  .  . 

from  Spectrum  Computers. 

Spectrum  Computers    •    Depl.  C.    •    26618  Southfield  Rd.    •    Uthrup  Villiage,  Ml  48076 

Phone  Orders  Welconu' 

(313)559-5252 


Apple  Cassette 


CRYSTALWARE 

House  ol  Usher 
AUTOMATED  SIMULATIONS 

Invjsion  Orion  J 

The  D.itesloni's  nl  Ryn 

Re-.i  ue  M  RiHi' 
ADVENTURE  INTERNATIONAL 

Scolt  Adcjmb 

#0  Special  Siirti[)ler 

#1    Adventuret.ind 

ttl   Pirates  Advcniure 

It}   MisM(jn  lrn(iossible 

HA   Vootfoo  C  aslk' 

MS   The  Count 

t>b  Strange  Odyssey 

117  jMy^lery  Fun  Huuse 

#8  Pyramid  ol  Doom 

#9  Gho'il  Town 

Mounlam  Shool 

Slarlrek   1.5 
PAYMENT;  SenrI  C.ishiors  Check  tjr  Muni-y  Order  jncf 
VISA  and  MASTERCARD:  Include  all  numhers  on  cird 


Apple  Disk 


S24.95     M8K) 


Atari 


l'J.95 

I32K) 

14.95 

I32K) 

19.45 

IT2K) 

6.45 

(i4K) 

#0 

14.95 

(24K) 

#1 

14.95 

I24KJ 

#2 

14.95 

(24K) 

#3 

1 4.95 

(24K) 

#4 

14.95 

(i4KI 

#5 

14.95 

(i4K) 

#6 

14.95 

(24KI 

#7 

14.95 

<24Kl 

#8 

I4.V5 

(24KI 

#9 

24.95 
19.95 
29.95 


(4BKI 
I48KI 
l4aKl 


39.95 
(#0 

34.95 
(#4 

39.95 

(#7 


I24K) 
#31 

(24KI 
#(il 

124K1 
#4) 


we'll  shif)  iniinedi.ilely  •  PERSONAL  CHECKS; 
«      SHIPPING  CHARGE:  Add  $2  lo  lol.il,  order  3 


Diskette 

124.95 

(40K) 

Casette 

24.95 

(32KI 

19.95 

(32K1 

29.95 

I32KI 

6.95 

I24K) 

14.95 

(24K1 

14.95 

(24K) 

14.95 

124K) 

14.95 

I24K) 

K.95 

I24K) 

K.95 

I24K1 

K.95 

I24K1 

1-1.95 

I24KI 

14.95 

I24K1 

4.95 

I16KI 

14,95 

I32KI 

Allow  3  weeks  lo  cIGiK 

orniore,  we  p.iy  shipping 
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we  carry  it 


Atari''  Software 

VisiCalc 149 

CX4101  Invitation  to  Programming  1  ..  17 

CX41 04  Mailing  List 17 

CX4102  Kingdom 13 

CX41 03  Statistics 17 

CX41G5  Blackjack 13 

CX4106  Invitation  to  Programming  2  ..  20 

CX4107  Biorliythm 13 

CX4108  Hangman 13 

CX4109  Graph  It 17 

CX4111  Space  Invader 17 

CX41 1 0  Touch  Typing 20 

CX41 15  fv1ortgage&  Loan  Analysis....  13 

CX41 1 6  Personal  Fitness  Program 13 

CX41 17  Invitation  to  Programming  3  ..  20 

CX4 1 1 8  ConversaJional  French 45 

CX41 1 9  Conversational  German 45 

CX41  20  Conversational  Spanish 45 

0X4121  Energy  Czar 13 

CX41 25  Conversational  Italian 45 

CX8108  Stock  Charting 20 

CXL4001  Educational  System  Master ..  21 

CXL4002  BasicComputing  Language . .  46 

CXL4003  Assembler  Editor 46 

CXL4004  Basketball 30 

CXL4005  Video  Easel 30 

CXL4006  Super  Breakout 30 

CXL4007  Music  Composer 45 

CXL4009  Chess 30 

CXL401 0  3-D  Tic-Tac-Toe 30 

CXL4011  Star  Raiders 33 

CXL4015  TeleLink 20 

Talk  &  Teach  Courseware: 

CX6001  to  CX601 7 23 


everything  for  Commodore 
and  Atari 


Atari®  Peripherals: 

400  16K $349 

410  Recorder 59 

810  Disk 469 

815  Disk 1199 

822  Printer 359 

825  Printer 629 

830  Modem 159 

850  Interface  Module 139 


Atari'  Accessories 

0X853  1 6K  RAM 89 

CX70  Light  Pen 64 

0X30  Paddle 18 

CX40  Joystick 18 

CX86  Printer  Cable 42 

C016345  822  Thermal 

Printer  Paper 5 

CA0 16087  S25  80-COI. 

Printer  Ribbon 

O/box) 17 

Microtek  16K  RAM 79 

Microtek  32K  RAM 1T9 


Qcommodore 


VIC-20 S   279 

4032N 1080 

8032 1 499 

CBM  4022  Printer 669 

CBM4040  Drive 1039 

CBM  8050  Drive 1449 

CBM  C2N  Drive 87 

PET-IEEE  Cable 37 

IEEE-IEEE  Cable 46 


-Jk 


ATARI  800  ~ 

with  32K  RAIVl 


Disks 


Maxell  Disks 1 0  for  $36 

Syncom  Disks 10  for    29 

Atari  Disks 5  for    22 


only  $759 


Printers 


NEC  5530 2495 

Diablo  630 2 1 95 

Trendcom  100 299 


Starwriter $1 495 

Trendcom  200 489 

Paper  Tiger  445G 769 

Paper  Tiger  460G 1219 

Epson  MX-80 499 

Tally  8024 1699 


Software 


EBS  Accounts  Receivable 

Inventory  System .$595 

OZZ  Information  System 329 

BPI  General  Ledger 329 

Tax  Package 399 

Dow  Jones  Portfolio  Management  . ,    1 29 

Pascal 239 

WordPro  3  (40  col.) 186 

WordPro  4  (80  col.) 279 

WordPro  4  Plus  (80  col.) 339 

Wordcraft  80  319 


Please  Call  Between  1 1AM  &  6PM 
(Eastern  Standard  Time) 

(800)  233-8950 


No  Risk- 

No  Deposit  On 
Phone  Orders  - 

COD  or 

Credit  Card -Shipped  Same  Day  You  Call* 

Prepaid  Orders  Receive  Free  Shipping 

*  on  all  in  stocl<  units 
Computer  Mail  Order  501  E.  Third  St.,  Williamsport,  PA  17701  (717)  323-7921 
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Where  applicable,  it  will  compute 
the  add-on  minimum  lax  or  the 
alternative  minimum  lax.  For 
individuals,  it  will  compute  the 
employee  social  security  tax  or 
the  self  employment  tax.  The 
program  will  compute  the  appli- 
cable taxes  for  all  individual  filing 
statu.ses,  for  corporations  and  for 
accumulation  trusts. 

Although  designed  primarily 
for  professional  tax  and  financial 
advisors,  it  is  self  documented 
and  can  be  used  by  business 
owners  or  investors  who  are 
reasonably  familiar  with  the  tax 
laws.  The  program  was  designed 
by  Vernon  K.  Jacobs,  a  CPA  and 
CLU  who  practices  as  a  financial 
and  tax  consultant.  He  is  also  the 
editor  of  Tax  Angles,  a  tax 
strategy  newsletter,  and  is  the 
author  of  The  New  Taxpayer's 
Counterattack. 

The  retail  price  of  the  pro- 
gram is  $500  and  annual  updates 
are  $300.  The  user  manual  is  $15. 
For  further  details  write  to  Syntax 
Corporation,  Box  8137-P,  Prarie 
Village,  KS,  66208  or  call  at  (913) 
362-9967.  Dealer  and  O.E.M. 
inquiries  are  welcome. 

New  Inmoc 
Catalog  For 
Microcomputer 
Users:  A 
"Micro-Oftspring" 

Santa  Clara,  CA,  June  18  —  The 
first  catalog  dedicated  to  meeting 
supply,  accessory,  and  cable  needs 
of  microcomputer  users  is  now 
available  from  In  mac.  Called  The 
Microcomputer  User's  Idea 
Book,  the  32-page  publication 
lists  over  1000  products  —  from 
software  packages  and  C^RTs  to 
fiexible  disks,  printer  ribbons, 
and  EDP-tailored  furniture. 

Featured  for  the  first  time  by 
Inmac  are  several  peripherals  and 
software  packages.  These  include 
the  recently  introduced  high- 
speed Centronics  739  printer,  a 
line  of  Sanyo  data  display  moni- 
tors, and  VisiCalc  and  DB  Master 


software  for  A]3]3le  users. 

The  Idea  Book  has  been 
designed  to  make  product  selec- 
tion quick  and  simple.  Separate 
secticms  show  complete  supplies, 
accessories,  and  cables  for  Apple, 
Atari,  TRS-80,  and  Northstar.  In 
addition,  extensive  cross- 
referencing  shows  compatibility 
with  many  other  systems. 

Other  sections  list  products 
by  functions  —  storage,  pre- 
ventative maintenance,  safety 
and  security,  lightning,  and 
prodiictivity. 

For  more  information 
write  to: 

Inmac 

Department  12 

2465  Augustine  Drive 

Santa  CHara,  CA  9505 1 

Utility  "Translation" 
For  Apple  Owners 

Mint  Software  has  announced  the 

release  of  a  utilitv  for  u.sers  of  the 
Applewriter,  Supertext  and 
Superscribe  word  processing 
systems.  Super  Apple  Textwriter 
allows  the  user  to: 

1.  Convert  files  generated 
under  any  one  of  these  three 
word  producers  into  files  accessi- 
ble by  the  other  two.  For  example, 
users  wishing  to  convert  files 
generated  by  Applewriter  into 
files  accessible  by  Supertext  may 
do  so  with  ease. 


2.  Convert  standard  text 
files  into  files  accessilile  bv  either 
Supertext  or  Applewriter  or 
Supertext  files  into  standard  text 
files. 

This  utility  is  of  particular 
value  to  those  users  who  wish  to 
use  their  word  processing  system 
to  edit  information  obtained  from 
one  of  the  commimicaiions 
networks  (e.g.  The  Source),  as 
well  as  those  who  wish  to  use  a 
modem  to  transmit  over  the 
phone  lines  files  created  by  one  of 
the  word  processors.  It  is  even 
possible  to  develop  and  edit  a 
BASIC  program  utilizing  the 
editing  features  of  a  word  proces- 
sor, and  then  use  Super  Apple 
Textwriter  to  convert  the  resultant 
tile  into  a  text  file  which  may  then 
be  EXECed  into  mmemory. 
Super  Apple  Textwriter 
retails  for  $49.95.  It  may  be 
ordered  from  Mint  Software, 
6422  Peggy  Drive,  Baton  Rouge, 
Louisiana  70806.  Phone  (504) 
766-23 1 8.  Dealer  inquiries  are 
invited. 


The  international 
Microcomputer 
Software  Directory 

This  directory  provides  all  micro- 
computer users,  professional  and 
amateur,  with  a  primary  reference 
source  of  microcomputer  .software 
for  all  applications  and  systems. 

It  is  drawn  from  a  large 
database  that  is  continually  being 
updated  with  information  col- 
lected from  all  parts  of  the  world 
through  offices  in  Britain  and 
America.  The  directory  has  three 
main  sections: 

1 .  Sy stem  C  las  s  i  H  cation  — 
for  the  user  limited  to  a  particular 
system.  Programs  compatible  with 
each  respective  system  are  listed 
in  subject  and  price  order. 

2.  Subject  Classification  — 
for  the  user  who  can  tise  any 
system  or  who  has  not  ycl  pur- 
chased a  system.  Programs  are 
listed  under  subject  areas  in  price 
order  giving  information  as  to 
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16K  MEM0RY-$22.00 

FOR  APPLE  -  TRS-80  -  EXIDY  -  S100 

NEC-MOSTEK-NATIONAL-FUJITSU 

4116  EQUIVALENT 

4116    200NS  DYNAMIC  RAM    8  for  $22.00 

4116    150NS  DYNAMIC  RAM    8forS2a00 

2114-300ns 

2114    300NS  STATIC  RAM    8  for  $26.00 

^-"-jr^C"'T^^C^     1771  Junction  Avenue 
c^mPonln^  sSply^n^c.    ^an  Jose.  Catifornia  951 12 
V/W  V/V/  <*°®'  295-7171 


TE^MS:  (1 1  PREPAID     Send  check  oi  M  O   Tor  mei chandiSB  amouni  only  -  we  p^y  the  snipping  v 
{2)  UPS  COD  0(  B^nkcard  orders  by  phone  ar  mail  -  shipping  changes  added 
C^iilofma  Rflsicenis  add  6  5°[  Sales  ~ia* 


LOWER  THAN 
DISCOUNT 

SUPER  SPECIAL 


tagaaagiBi 


ATARI  600 
S  705. 00 


ATARI  D.D. 
5460.00 


ATARf  SOFTWARE  20  %  off 

EPSON  MX60  475.00 

DCHAYE5MICROMODEMII  289.00 

Z-80  5OFCARD  295.00 

MICROSOFT  16K  150.00 

NOVATION  DCAT  160.00 

BMC  MONITOR  225.00 


QDDQD==iii 

MARKETING  CORPORATION 

THE  PURCHASING  AGENT  FOIV  HOME  AND  DU5INE55  ELECTIXONICS 
PO0OX77  BEVERLY  HILLS  CA  90213  (213)451  6089 

CALL  OR  WRITE  FOR  FREE  CATALOG 


SAVE  ON  ATARI 

400  &  800  COMPUTERS 

POPULAR  ATARI  SOFTWARE 

ATARI  400  (8K) 

395 

CXL4011    STAR  RAIDERS 

44 

ATARI  {16K) 

460 

CX    4111   SPACE  INVADERS 

16 

ATARI  400  (48K) 

675 

CXL  4005  VIDEO  EASEL 

29 

(w/INTEC  RAM  INSTALLED) 

CXL  4104   MAILING  LIST 

16 

ATARI  800  {16K) 

775 

CXL  4007  MUSIC  COMPOSER 

44 

ATARI  400  (48K)  W/DISK  DRIVE 

1080 

CXL  4015  TELE  LINK 

CXL  4003  ASSEMBLER  EDITOR 

CX     4103  STATISTICS  1 

CX    4109  GRAPH  IT 

18 
42 
15 
15 

- 

CX     8102  CALCULATOR 

PERSONAL  SOFTWARE  AVAILABLE 

21 

PERIPHERALS  &  ACCESSORIES 

409105  VISICALC  -  ATARI 

165 

410  PROGRAM  RECORDER 

59 

109105  VISICALC  -  APPLE 

140 

810  DISK  DRIVE 

460 

TO  ORDER: 

815  DUAL/DISK  DRIVE 

1100 

PHONE     RESERVATIONS     OF      EOUIPMENT 

820  40  COL  IMPACT  PRINTER 

350 

INVITED.     SEND     CASHIERS    CHECK,     MONEY 

822  40  COL  THERMAL  PRINTER 

350 

ORDER.    OR    PERSONAL    CHECK.    (PERSONAL 

825  80  COL  IMPACT  PRINTER 

725 

CHECK  ORDERS  SENT  UPON  CLEARING.) 

ALL 

830  ACOUSTIC  MODEM 

155 

ORDERS  SENT  UPS,  ADD  SI. 00  PER  ITEM 

FOR 

850  INTERFACE  MODULE 

165 

SHIPPING-    CALIFORNIA    RESIDENTS    ADD 

6% 

CX40  JOY  STICK  CONTROLLER/PR 

16 

SALES  TAX. 

CX30  PADDLE  CONTROLLER/PR 

17 

SEND  ORDER  TO: 

CX70  LIGHT  PEN 

57 

CRISP  SYSTEMS 

CX8100  810  BLANK  DISKETTES  5/BOX 

20 

9813  GREENWOOD  CT. 

INTEC  32K  RAM  FOR  800 

169 

FONTANA.  CA  92335 

INTEC  48K  RAM  FOR  400 

269 

(714)  824-9832 
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compatible  systems. 

3.  Software  House  ClassiJ^- 
cation  —  for  the  user  wishing  to 
buy  from  a  particular  software 
house.  Programs  are  listed  in 
ISPN  (international  standard 
program  number)  order,  cross- 
referenced  with  the  other  two 
sections  and  giving  full  details 
(where  available)  as  to  date  of 
release,  warranties,  distributors, 
distribution  medium  (cassettes, 
disk,  etc.)  source  code,  compatible 
systems,  special  configurations 
needed,  special  features,  limita- 
tions and  prices. 

The  complete  directory  is 
available  for  $28.95  (plus  $2.95 
postage  and  packing).  Also 
available  at  $14.95  (plus  $1.95 
postage  and  packing)  are  system 
specific  directories  that  are 
extracted  and  cross-referenced 
from  the  main  data  base.  These 
list  those  programs  written  specif- 
ically for  the  Apple.  PET,  TRS 
80,  and  CP/M.  These  publications 
will  be  available  in  June,  1 98 1 . 

An  on  demand  search  facility 


will  be  available  from  July  1981, 
which  will  provide  up  to  the 
minute  information  on  new 
software  available  for  a  particular 
application  or  system. 

For  more  intorniation 
contact: 

Imprint  Software 
US-420  South  Howes 
Ft.  Collins,  CO  80521 
(303)  482-5574 
UK- 16  Milton  Avenue 
Highgate,  London  N6 
Tel  01-348-3998 

New  Autodial- 
Autoanswer  Modem 
For  The  Atari® 
400/800  Computer 

Redmond  Wa.  —  The  Microperi- 
pheral  Corporation  has  just 
announced  a  new  peripheral  for 
the  ATARI*  Model  400/800 
Personal  Computer  System.  The 
MICROCONNECTION'"  is  a 
direct  connect  modem  which 


eliminates  the  need  for  acoustic 
coupled  devices.  An  AUTODIAL/ 
AUTOANSWER  option  permits 
dialing  or  responding  to  other 
computers  automat k  ally.  The 
option  is  available  for  use  with 
either  the  Model  400  or  800,  with 
or  without  the  ATARI*  850 
Expansion  Interface.  When  used 
with  the  Model  850,  it  is  direcdy 
interchangeable  with  the  ATARI® 
modem. 

Applications  for  this  new 
product  are  virtually  unlimited. 
For  example,  by  using  the 
AUTODIAL  feature,  the  unat- 
tended 400/800  can  .lend  mes- 
sages, text  or  other  data  to  a  host 
computer.  The  ATARI®  400/800 
can  also  be  set  up  to  act  as  an 
unattended  host.  I'lie  modem  will 
automatically  answer  the  tele- 
phone and  permit  tJie  400/800  to 
capture  data  being  sent  to  it. 
Typical  applications  include  small 
business  bulletin  boards  and 
message  centers  or  automatic 
downloading  of  programs  and 
other  data. 


QUALITY  ACCOUNTING  SOFTWARE 
for  the  CBM  COMPUTER 


THE  GENERAL  LEDGER  SYSTEM      $  1 50.00 

Afl  entries  are  made  via  formatted,  fill  in  the  blanks, 
screens.  Tfiere  is  a  separate  check  stub  fotmat  disburse- 
ments entry  screen  and  eight  digit  account  numbers  to 
allow  sub  coding  as  required.  Up  to  fifty  user  designated 
journals  are  avaifabte.  All  data  is  verified  on  input  with 
balance  enforced.  Alljournals  are  available  for  print  at 
any  point  in  the  accounting  cycle,  Any  printout  may  be 
printed  by  department.  The  general  ledger  prints: 
balance  forward,  full  detail  of  each  transaction,  total 
credits,  total  debits,  and  end  balance  for  each  account. 
Available  reports  include.journals,  disbursements 
register,  current  trial  balance,  audit  trial  balance,  budget 
trial  balance,  income  statement,  balance  sheet,  cash 
flow  analysis,  and  comparison  of  budget  vs.  actual 
amounts  for  year  to  date,  or  the  current  period. 

FUND  ACCOUNTING  SYSTEM  $200.00 

The  perfect  accounting  system  for  the  municipal  utility 
district,  and  the  small  city  or  school  district  The  system 
includes  all  features  of  the  general  ledger  system  with 
the  added  ability  of  printing  all  reports,  and  the  general 


ledger,  by  fund  as  well  as  by  department. 

CLIENT  ACCOUNTING  SYSTEM         S200.00 

The  accounting  tool  kit  for  the  public  accountant.  This 
system  includes  all  features  of  the  general  ledcer  system 
with  the  addition  of  a  payroll  check  stub  formatted 
screen  for  payroll  check  input.  Also  included  are:  a 
payroll  disbursement  register,  a  1099  register,  94 1 
reports,  and  W-2's, 

INTERLOCKING  MODULES 

The  following  modules  are  available  for  any  of  the 
general  ledger  based  systems: 

Accounts  Payable  S  75.00 

Accounts  Receivable  S  75.00 

Payroll  S  75.00 

Job  Cost  Payroll  SI  00.00 

Utility  Billing  System  SI  00.00 

Accounting  software  may  be  reviewed  at  your  dealer,  or 
via  mail.  Full  catalog,  demo  disc,  sample  operaiions  man- 
ual, (please  specify  which  system),  and  a  S20.  credit  cou- 
pon—only S20.00 

DEALERS!  Please  Write  for  Dealers  Pack 


Expanded  Software  Catalog  Free  on  Requesi 

BASIC  SOFTWARE  SERVICE 

P.O.  BOX  \a\,lA  PORTE,  TX.,  77571 
Phone  Area  Code  7 1 3/  470-  i  857 
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(appkz 

JI^ATARr 

EPSON 
. . .  and  more 
Ai>pleII 

32K '1099"" 

48K ..,..'1149"° 

Disk  II  W/3-3DOS  ...'  529"° 

Disk  II  '  450"" 

Apple  111  W/128K  ....'3600"" 

EPSON 

MX-70  '  399°" 

MX-80  CALL 

Apple  card  &  cable..'    99"" 

ATARI^ 

400  W/16K  '  m^ 

800  W/16K  '  775"° 

810  Disk  Drive '  449"" 


We'll  meet  or  beat 
any  advertised  price. 


«;;■  HEWLETT 
mLfiM  PACKARD 

HP-85A  W/16K '2697^" 

SEC 

5510-2  w/Tractor  .,.'2550"" 
5520-2  w/Tractor  ...'2850"" 

SOROC 

IQ  120  '  725"" 

IQ  135  '  799"" 

C.ITOH 

Comet  '  499^^ 

Starwriter '!450"° 

Northstar.  Altos  and  Zenith 
All  25%  Discount 

LO-BALL  COMPUTERS 

7677  S.W.  Cirrus  Dr. 
Beaverton,  OR.  97005 

TO  ORDER 
GALL t503)  641-0211 

Ordering  Infarmatior:  For  fastest  ser- 
vice, send  money  order,  castiier's 
checl(  or  bank  wire.  Visa  and  MC 
orders.  adcJ  3\.  Personal  cfiecks 
accepted  (allow minimum  lOdaysto 
clear}.  Hours  9-5,  M-F. 
Call  for  our  Free  Catalog. 


■SOFTWARE 

FREE  OFFER 

WITH  PURCHASE  OF  ANY  3  PROGRAMS,  YOU  WILL 

RECEIVE  FREE  THE  ORIGINAL  ADVENTURE  GAME, 

CONVERTED  TO  LOAD  ENTIRELY  INTO  48K  RAM  ON 

APPLE.  NOTHING  LEFT  OUT.  AMAZING! 

APPLE  SOFTWARE 
DISCOUNTS  FROM  10%  TO  30% 

[1  MAGIC  WINDOW $99.95  SALE       S89.S0 

nSUPERTEXTII S150.00  SALE    $135.50 

t  lAPPLE  PIE  (40  OR  80  COL)  ..,.3129.95  SALE    $119.50 

MSUPERSCRIBE S99.9S  SALE       $84.50 

MEASY  WRITER  80  COL S2SO.0O  SALE    $225.50 

IIMODIFIABLE  DATABASE S79.S0  SALE       $69.50 

("IMAILING  LIST  DATABASE S50.00  SALE       $34.50 

:  IGEN.  LEDGER  (CONT.) S175.00  SAUE    $140.50 

;  lACCTRCVBLEfCONT.) S175.00  SALE    $140.50 

nACCTPAYABL(CONT.) S175.0O  SALE    $140.50 

nPPTYMANGMT{CONT.) S17S.00  SALE    $t40.50 

nVISICALC  3.3  (PERSONAL)  ....$199.95  SALE    $169.50 

I  IHOME  MONEY  MINDER S34.95  SALE       $29.50 

I  IWIN  AT  RACES  [HANDICAP)  ....S39.95  SALE       $33.50 

I  IL  A  LAND  MONOPOLY $29.95  SALE       $25.50 

nWARP  FACTOR $39.95  SALE       $35.90 

I  IZORK $39.96  SALE      $35.50 

I   IMISSION  ASTEROID $19.95  SALE       $17.50 

nPRO  FOOTBALL  POINT  PRED  ..$26.95  SALE       $22.50 

lODYSSEY  ADVENTURE S30.00  SALE       $26.50 

ICOMPU-MATH  ARITHMETIC $49.95  SALE       $39.50 

ICOMPU-MATH  FRACTIONS S39.9S  SALE       $35.50 

i  ICOMPU-MATH  DECIMALS $39.95  SALE       $35.50 

ICOMPU-SPELL(REQ.  DATA  DISK).. ..529.95  SALE       $29.50 

ilDATA  DISK  LEVEL  4 S19.9S  SALE       $16.50 

LIDATA  DISK  LEVEL  6 $19.95  SALE       $16.50 

GDATA  DISK  SECRETARIAL SI 9.95  SALE       $16.50 

n STATISTICS  3.0 $29.95  SALE       $25.50 

M  PERCEPTION  3.0 $24.95  SALE       $22.50 

I1ALGEBRA1 $39.95  SALE       $33.50 

IISPACEEGGS $29.95  SALE       $25.50 

nALIENRAIN(GALAXlAN) $24.95  SALE       $22.50 

lALIEN  TYPHOON $24.95  SALE       $22.50 

ISNOGGLE(NEVi^PUCKMAN).... $24.95  SALE       $22.50 

i  IWIZARD  AND  THE  PRINCESS  ..$32.95  SALE       $29.50 

fl MYSTERY  HOUSE $24.95  SALE       $22.50 

riPULSARII  S29.9S  SALE       $25.50 

i   lORBITRON $29.95  SALE       $25.90 

IGAMMA  GOBLINS S29.95  SALE       $25.50 

I   IHI-RES  SOCCER $29.95  SALE       $29.90 

GSARG0N11  $34.95  SALE       $29.50 

HADAMS  ADVENTURE  #1,2,3... .S39.9S  SALE       $34.50 

ilADAMS  ADVENTURE  #4,5,6. ...$39.95  SALE       $34.50 

HADAMS  ADVENTURE  «7,8,9....S39.95  SALE       S34.SO 

riADVENTURE  HINT  BOOK 57.95  SALE         $6.50 

HTEHPLEOF  APSHl $29.95  SALE       $24.50 

HHELLFIRE  WARRIOR $29.95  SALE       $24.50 

:  IFASTGAMMON $24.95  SALE       $22.50 

:  ITHREE  MILE  ISLAND $39.95  SALE       $35.50 

M  PHANTOMS  FIVE $29.95  SALE       $25.50 

lE-Z  DRAW  3.3 $49.95  SALE       $39.50 

I  ITHE  PRISONER $29.95  SALE       $25.50 

nTERRORIST $29.95  SALE       $25.50 

nSPACE $29.95  SALE       $25.50 

nA.B.M $24.95  SALE       $22.90 

DCYBER  STRIKE $39.95  SALE       $34.50 

[HFLIGHT  SIMULATOR $35.50  SALE       $31.50 

1  I  AUTOBAHN $29.95  SALE       $29.90 

nOALACTIC  TRADER $24.95  SALE       $22.50 

aZ-80S0FTC.\RD $349.00  SALE    $299.90 

ni6K  RAM  CARD SI95.00  SALE    $179.90 

IIM/RSUPERTERMSOCOL $375.00  SALE    $329.90 

•  SEND  FOR  FREE  PRICE  LIST  &  CATALOG  • 


DEDUCT  3%  IF  PAYMENT  ACCOMPANIES  ORDER.  WC  PAV  SHIPPING 

AND  IF  YOU  PHONE  YOUR  0BD6B  WE  WILL  CnECMT  tl.OO  FOR   CALL. 

CALIFORNIA  RESIDENTS  ADD  6%  SALES  TAX,  ALL  ORDERS  SHIPPED  FROM 
STOCK  WITHIN  48  HOURS,  WE  ACCEPT  MASTER  CAFID  AND  VISA 

NAME 

STREET 

CITY  STATE ZIP 

CARD*  PHONE 

EXP.  DATE   SIGNATURE 

*  P.O.  BOX  796,  DEPT.  C-6,  TWIN  PEAKS,  CA  92391  * 

PHONE  ORDERS  (71 4)  337>4063  . 
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CBM/PET?  SEE  SKYLES  ...  CBM/PET? 


"You  mean  this  one  little 
Disk-O-Pro  ROM  will  give  my 
PET  twenty-five  new  commands? 

And  for  just  $75.00?  Why,  that's  only  $3.00  a  command!" 

The  Disk-O-Pro  in  any  PET  with  Version  III  (BASIC  2.0)  ROMs  (##*  COMMODORE 
BASIC  ###)  will  give  19  software  compatible  disk  insinjctions":  15  identical  with  the  new 
BASIC  4.0  (or  with  8032  ROMs)  compatible  with  both  old  and  new  DOS.  Plus  4  addi- 
tional disk  commands.. -including  appending  (MKRGE),  overla>ing  (MF.RGI-;  # ) 

and  PRINT  USING,  allowing  formatting  ompul  of  strings  and  numbers  on  the  PET 
screen  or  on  any  printer. 

'NOTE:  Old  DOS  doesn  'I  recognize  three  of  the  commands. 

Those  are  just  3  of  the  important  commands  — and  there  are  7  more  beauties — on 
your  Disk-O-Pro  that  have  never  been  available  previously  to  PET/CBM  users.  (Skyles 
does  it  again!) . . .  Beauties  like  the  softloueh  key  (SET)  *hich  allows  you  to  define  a  key 
to  equal  a  sequence  of  up  to  80  keystrokes;  like  SCROLL  whereby  all  kcy.s  repeal  as  well 
as  slow  scrolling  and  extra  editing  features;  like  BEEI'  which  allows  you  to  plav  music  on 
your  PET. 

The  Disk-O-Pro  is  completely  compatible  with  the  BASIC  programmer's  Toolkit.  The 
chip  resides  in  the  socket  at  hexadecimal  address  S9000,  the  rightmost  empty  socket  in 
most  PETS.  And  for  the  owners  of  "classic"  (or  old)  PETS,  we  do  have  interface 
boards. 

(For  those  owning  a  BASIC  4.0  or  8032,  even  though  the  Disk-O-Pro  may  not  be  suit- 
able, the  Command-0  is.  Just  write  to  Skyles  for  additional  information.  Remember,  we 
have  never  abandoned  a  PET  owner.) 

Complele  with  84-page  manual  written  by  Greg  Yob. .  .who  was  having  so  much  fun 
that  he  got  carried  away.  We  had  expected  32  pages. 

Skyles  guarantees  your  saiisfactlon:  if  you  are  not  absolutely  happy  with  your  new 
Disk-O-Pro  ROM  chip,  return  it  to  us  within  ten  days  for  an  itiimediaie  full  refund, 

DIsk-O-Pro  from  Skyles  Electric  Works $75.00 

Complete  with  interface  board  (for  "classic"  PETS) 95.00 

Shipping  and  Handling (USA  /Canada)  $2.  SO  (Europe/ Asia)  S  10.00 

i         California  residents  must  add  6%/6'/i  %  sales  lax,  as  required. 
Skyles  Electric  Works  Vlsa/Maslercanl  orders:  call  lollfree 
231E  South  Whlsman  Road                 (800)  227.9W8  (e.xcepl  California). 
Mountain  View,  CBllfornls  94041         California  orders:  please  call  (4151 
(415)  965-1735                                         96S-1735. 
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CBM/PET?  SEE  SKYLES  ...  CBM/PET? 


**Look  how  fast  I  create  these 
great  graphic  displays  on  my 
PET  with  the  new  PicChip... 
it's  like  home  movies." 


PicChip,  the  new  ROM  that  took  Europe  by  storm,  available 
only  from  Skyles  Electric  Works  in  the  U.S.  and  Canada. 

PicChip,  a  ROM  extension  of  the  BASIC  version  111,  BASIC  4.0  or  BASIC  8032  interpreter 
that  offers  over  40  commands  that  allow  you  to  create  programs  with  dynamic  graphics 
displays:  plots,  bar  graphs,  pictures;  and  rolling,  scrolling,  shifting  and  inverting.  All  in- 
stantly and  easily  added  to  your  BASIC  program. 

The  address  for  the  2000/3000  (which  would  require  PicChip  module  PC2),  for  the  4000 
(PC4).  and  for  the  8000(PC8)  is  SAOOO..  .unless  you  have  a  Mikro,  WordPro  III  or  IV, 
or  Jinsam,  which  occupy  that  same  address,  in  those  cases,  you  will  need  the  PicChip  on 
an  interface  board  that  would  reside  in  address  B800. . .  for  the  2000/3000  series  (PCB2), 
above  the  Toolkit .  For  the  4000  (PCA4)  and  8000  (PCA8),  the  .Mikro  or  WoodPro  would 
be  switchable  manually  using  the  Skyies  Socket-2-ME. 

Skyles  guaranlees  your  silisfaeiion:  if  you  are  not  absolutely  happy  with  your  new 
PicChip  return  it  to  us  within  ten  days  for  an  immediate,  full  refund. 

PicChip  from  Skyles  Electric  WorksfPlease  Indicate  PC2,  PC4,  PCS) S60.00 

Complete  with  interface  board  (Please  indicate  PCB2,  PCA4,  PCA8) 80.00 

Shipping  and  Handling (USA/Canada)  S2.S0  (Europe/Asia)  $10.00 

California  residents  must  add  6%/6'/i  %  sales  rax,  as  required. 


Skyles  Electric  Works 

231E  South  Whismin  Ktiad 
Mountain  View,  Cglifornia  94041 
(4!5)  965-1735 


Visa/Maslercard  orders:  call  tollfrec 
(800)  227-9998  (except  California). 
California  orders:  please  call  (415)  | 
965-1735. 
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The  MICROCONNEC- 
TION'"  for  the  ATARI"^  is  Bell 

103  compatible  and  operates  in 
the  originate  or  ansv/er  mode  al 
300  baud.  Models  for  use  without 
the  850  Interface  incorporate  a 
socket  (DB-25)  for  connection  to 
any  serial  printer  ca]xible  of 
operation  at  300  baud. 

Another  significant  feature  is 
the  provision  for  on-line  data 
storage.  An  inexpensive,  voice 
grade  cassette  recorder  can  be 
plugged  into  the  MIC:R0C0N- 
NECTION'"  and  will  "tran.sctifje" 
on-line  communications  for  later 
playback.  A  special  version,  which 
is  compatible  with  Eiuopean 
telecommunications  standards,  is 
also  available. 

The  unit  measures  7,7  inches 
wide  by  5.5  inches  deep  by  1 ,7 
inches  high  and  weighs  less  than 
one  pound.  The  price,  complete 
with  autodialing  terminal  soft- 
ware, |iower  source  and  con- 
necting cable  (but  wi  bout 
options),  is  S199.50.  The  AUTO- 
DIAL/AUTOANSWER OPTION 
IS  $79.00  extra. 

For  more  information, 
contact  l^he  Microcoperipheral 
Corporation,  2643  1 5 1  st  Place 
N.E.,  Redmond,  Wa.  98052, 
telephone  (206)  881-7544. 

\  1  .-Mtl.  .-V  I  Akl  ■lOll.ttllD.iiiil  .-V  I  .AHI  KStkin-  iriiili-iii.irts  i>l 
At.ni.  tri« .,  Surnivv.ilt-.  t;.\.  ji  VV.ittu-i  <  J  unng unit  .il inn ^  (jv 


Atari  I/O  Package 

Ihe  MOSAIC  I/O  Package  can 
lielp  give  the  ATARI  computer 
direct  ties  to  the  real  work!.  The 
four  ports  on  the  front  of  the 
ATARI  computer  connect  directly 
to  a  PI  A  for  use  as  output  as  well 
as  input  ports.  Now  ^XTARI 
owners  can  build  custom  program 
controllers,  interface  to  home 
control  circuits,  or  u.'c  any  hard- 
ware the  imagination  can  devise. 
The  I/O  package  comes  with 
4  —  nine  pin  connectors,  4  —  twelve 
inch  lengths  of  nine  conductor 
ribbon  cable,  and  complete  in- 
sl ructions  lor  their  use.  The 
documentation  inclutles  examples 
of  home-built  program  con- 
trollers, how  to  access  the  ports 
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througli  BASIC  coinniaiuis, 
sliadow  registers,  or  ciii'ectly,  aiicl 
how  to  set  up  and  address  the 
ports  for  output.  Orflcr  numhcr 
H-i09.  PiiceSlK.OO. 

MOSAIC  ELECTRONICS 

P.O.  Hox  748 

Oregon  City.  OR  97043 

New  Product  releases  are 
selected  from  submissions  for 
reasons  of  timeliness,  available 
space,  and  general  interest  to 
our  readers.   We  regret  that  we 
are  unable  to  select  all  new 
product  submissions  for 
publication.  Readers  should  be 
aware  that  we  present  here  some 
edited  version  of  material 
submitted  by  vendors  and  are 
unable  to  vouch  for  its  accuracy 
at  time  of  publication. 

New  Literature 

Microcomputer 

Products 

A  new  catalog  from  ELEC>TRIC 
SPECIALISTS  presents  tlieir  line 


oi  MICROCOMPUTER  inlerler- 
ence  control  products.  Protective 
devices  are  also  included. 

De.scriptive  sections  are  in- 
cluded which  outline  particular 
problems.  Suggested  sohitions  are 
given.  Typical  applications  and 
uses  are  also  outlined.  Request 
Catalog  HI  1. 

Electronic  Specialists,  Inc. 

171  South  Main  Street 

Natick.  MA  01760 

Phone:  (617)655-1532 


CBIVI/PET?  SEE  SKYLES  ...  CBIVI/PET? 


**Should  we  call  it  Command-O 
or  Command-O-Pro?" 

That's  a  problem  because  this  popular  ROM  is 
called  the  Command-O-Pro  in  Europe.  (Maybe 
Command-O  smacks  too  much  of  the  military.) 

Dm  wliiucver  you  cull  il,  ihis  4K  byie  ROM  will  pmvidc  your  CBM  BASIC  4.0  (4016, 
40.12)  and  B032  compulLTs  wiih  20  addilional  commandi  including  10  Tooiki!  program 
cdiliiig  and  debugging  commands  and  lOaddilional  commands  for  screening,  formatting 
and  disc  Tile  manipulaling.  (And  our  manual  writer  dug  up  39  additional  commands  in  the 
course  of  doing  a  78-page  manual!} 

The  Command-O  extends  Commodore's  8032  advanced  screen  editing  features  to  the  ulli- 
niale,  You  can  now  SCROLL  up  and  down,  inscn  or  deleter  entire  lines,  delete  the  char- 
actcrs  10  the  left  or  right  of  the  cursor,  select  TEXT  or  GR/\PHiCS  modes  or  ring  the 
8032  bell.  Vou  can  even  redefine  the  window  to  adjust  il  by  sii'c  and  position  on  your 
screen.  And  you  can  define  any  key  to  equal  a  sequence  of  up  to  90  key  strokes. 

The  Command-O  chip  resides  in  he.vadecinial  address  S9000,  the  rightmost  empty  socket 
in  4016  and  4032  or  the  rearmost  in  8032.  If  there  is  a  space  conflict,  we  do  have  Socket- 
2-ME  available  at  a  very  special  price. 

Skyles  Kuaranlres  your  salisfaclion:  if  you  are  not  absolutely  happy  with  your  new 
Coniniand-O,  return  il  to  us  within  ten  days  for  an  immediate,  full  refund. 

Command-O  horn  Sliyles  FJeclric  Works S7S.00 

Complete  wilh  Socket-2-Mc 95,00 

Shipping  and  Handling (USA.'Canada)  S2.50  (Europe/Asia)  SIO.OO 

California  residents  must  add  6%/6V!%  sales  lax,  as  required. 

(j  Skyles  Electric  Works  Visa/Maslercard  orders:  call  tollfree  '| 

W  im:  Souih  Whi-sman  Road  (800)    227-9998   (except    California). 

O  Mountain  Mew,  CBlifornia  94(M1  California   orders;   please  call   (415) 

^^^  (4l5t  9f>5-n3S  9*5-1735. 


/lAiaO  ■■•  S31A>1S  33S  6i3d/IAiaO"  W 


CBM/PET?  SEE  SKYLES  ...  CBM/PET? 


'*They  laughed  when  I  sat  down 
at  my  PET  and  immediately  pro- 
grammed in  machine  language. . . 
just  as  easily  as  writing  BASIC." 

With  the  new  Mikro,  brought  to  you  from  England  by  Skyles 

Electric  works,  always  searching  the  world  for  new  products  far  PET/CBM  owners.  A 
4K  machine  language  assembler  ROM  that  plugs  into  your  main  board.  At  just  S80.00  for 
the  Mikro  chip,  it  docs  all  the  machine  language  work  for  you;  all  you  have  to  do  is  start 
laying  down  the  code. 

The  Mikro  retains  all  the  great  screen  editing  features  of  the  PET.  ..even  all  the  Toolkit 
commands.  (If  you  own  a  Toolkit,  of  course.)  Sit  down  and  write  your  own  machine 
language  subroutine.  The  program  you  write  is  the  source  code  you  can  save.  And  the 
machine  language  monitor  saves  the  object  code.  The  perfect  machine  language  answer 
for  most  PET  owners  and  for  most  applications.  (Not  as  professional  as  the  Skyles  Macro- 
TeA...not  as  expensive,  either,) 

A  great  learning  experience  for  those  new  lo  machine  language  programming  but  who 
want  to  master  it  easily.  Twelve-page  manual  inclttded  but  we  also  recommend  the  book, 
"6502  Assembler  Language  Programming,"  by  Lance  A.  Leventhal  at  S17.00  direct 
from  Skyles. 

Skyles  Ruaranlccs  your  sstisfacdon:  if  you  are  not  absolutely  happy  with  your  new 
Mikro,  return  it  to  us  within  ten  days  for  an  immediate,  full  refund. 

Skyles  Mikro  Machine  lan^iia^e  assembler. S80.00 

"6502  Assembler  l.anjjua);r  I'rogrummlnB"  by  Leventhal 17.00 

Shipping;  and  Handling (USA  /Canada)  S2, 50    (Europe/ Asia)  S  10.00 

California  residents  must  add  6%/6'A  %  sales  tax,  as  required. 


Skyles  Electric  Works 

13IK  Kiiulh  \\hisnian  Koud 
Mountain  Mew,  Callfurnia  94041 
(415)  965-1735 


Visa/ Mastercard  orders!  call  tollfree 
18001  227-9998  (except  California). 
California  orders:  please  call  (415) 
965-1735. 


/lAiaO  ■""  S31A>1S  33S  6l3d/IAiaO"  oJ 
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With  the  Storwrlter™  Daisy 
Wheel  25  cps  printer  from  C.  Itoh. 

A  business  letter,  written  on  a  45  cps 
word-processing  printer,  might  take 
about  two  minutes  to  print. 

With  the  Stfirwriter,  it  might  take 
closer  to  three. 

The  typical  45  cps  printer  retails  for 
about $3,000. 

But  the  Starwriter  25  retails  for  about 
$1,895— thus  saving  you  about  $1,000. 

And  therein  lies  the  biggest  difference 
between  the  Starwriter  25  and  the  more 
expensive,  daisy  wheel  printers. 

The  Starwriter  25  comes  complete 
and  ready-to-use,  requiring  no  changes 
in  hardware  or  software.  It  uses  indus- 
try-standard ribbon  cartridges,  and  it's 
"plug-in"  compatible  to  interface  with  a 


wide  variety  of  systems,  to  help  lower 
system-integration  costs. 

Using  a  96-character  wheel,  it 
produces  excellent  letter-quality  print- 
ing on  three  sharp  copies  with  up  to  163 
columns,  and  offers  the  most  precise 
character-placement  avaQable,  for  out- 
standing print  performance. 

C.  Itoh's  warranty; 

3  months  on  parts  and  labor,  sup- 
ported by  one  of  the  best  service  organi- 
zations in  the  industrv. 


*iOOOOFF 

Leading  Edge  Products,  Inc.,  CM-S 
225  Turnpike  Street, 
Canton,  Massochusetts  02021 

Dear  Leading  Edge; 

I'd  like  (o  know  more  alxnu  (he  Starwriter.  and 
how  spending  a  minute  ran  save  me  a  grand. 
Ploa.ie  send  me  the  name  oi  mv  neare.st  flealei . 


Name 

Tide 

(Company. 

Street 

Citv 


St;ite 

Phone:  .'^rea  C^ode . 
Number 


.Zip. 


LEADING 
EDGE. 


Leading  Edge  Prodnci.s,  Itic,  225  Turnpike  .Street,  Canton,  Massachusetts  02021 
Dealers;   For  immediate  delivery  tVoni  the  Leading  Edge  In\entorv  Bank"  call  toll  free  1-800-343-6833 

In  Massachusetts,  call  collect  (617)  828-8150.' Telex  951-624 


TtieGieat 
American  Solution 

Machine. 


Meet  Commodore.  The  busi- 
ness computer  that's  providing 
solutions  for  more  than  100,000 
people  all  over  the  world.  Built 
by  one  of  the  pioneers  in  office 
machines.  With  a  reputation  for 
quality  that  can  only  come  from 
vertical  integration  of  the  total 
manufacturing  process.  Commo- 
dore builds,  not  assembles. 

Compare  Commodore's  word 
and  data  processing  capabilities 
with  computers  costing  twice  or 
even  three  times  as  much.  You'll 
see  why  so  many  small  busi- 
nesses are  turning  to  Commodore 
for  solutions  to  problems  as  var- 
ied as  these: 

n   A  car  leasing  company's  cus- 
tomers were  terminating  too  early 
for  account  profitability.  Solu- 
tion: A  16K  Commodore.  It 
analyzes  cash  flow  on  over  1200 
accounts,  identifies  those  for 
early  penalties,  and  even  writes 
up  lease  contracts.  Commodore 
paid  for  itself  within  weeks. 
□   A  law  firm  needed  a  high 
quality,  easy-to-use,  affordable 
word  processing  system. 
Solution:  Commodore  plus 
its  WordPro  software  pack- 


age. At  a  S6,000  savings. 
L  A  gasoline  retailer  needed  to 
inventory,  order  and  set  prices; 
determine  Federal  and  state 
income  taxes;  and  comply  with 
Federal  pricing  and  allocation 
regulations.  All  done  daily 
weekly,  monthly  and  yearly. 
Solution:  Commodore.  It  keeps 
his  business  on  track  —  and  Uncle 
Sam  off  his  back. 
G   A  paint  and  wallpaper  store 
had  to  inventory  over  600  expen- 
sive wallpaper  lines  for 
profitability,  monitor  distributor 
sales,  set  and  track  salesmen's 
goals,  and  help  the  customer 
select  the  right  size,  pattern  and 
quantity.  Solution:  Two  32K 

Commodore  com- 
puters, floppy 
disk  and 
printer. 
Commodore 
does  it  all  — 
and  account- 
ing, too. 
In  applica- 
tions like 
these. 


and  many  more.  Commodore 
solves  the  problems  that  stand  in 
the  way  of  increased  profitability. 
Commodore  can  provide  the  solu- 
tion in  your  Great  American  bus- 
iness, too.  Find  out  more  by  call- 
ing or  writing  any  of  Commo- 
dore's District  Sales  Offices. 
WOBURN,  MA  2  Tower  Office  Park 
01801.  (617)  938-0552. 
KING  OF  PRUSSIA,  PA  761  Fifth 
Avenue  19406.  (215)  666-7950. 
SANTA  ANA,  CA  1701  E.  Edinger 
Road  92705.  (714)  972-1415. 
SANTA  CLARA,  CA  2344B  Walsh 
Avenue  95051.  (408)  727-4755. 
DALLAS,  TX  —  the  new  phone 
number  is:  (214)  458-1000. 

Commodore  Business  Machines,  Inc., 

Computer  Systems  Division, 

681  Moore  Road, 

King  of  Prussia, 

PA  19406, 

COMMODORE 

SOFTWARE 

HOTLINE: 

1-800-523-5622. 


commodore 


